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This publication provides Model 20 operators with 
the information required to operate their systems 
using the Model 20 Tape Programming System (TPS) . 

Detailed information is given on (1 ) building 
a tape-resident system from IBM-supplied programs, 
(2) maintaining this system by means of IBM-sup- 
plied programs, (3) executing IBM- supplied and 
user-written programs under control of the* tape- 
resident and card-resident systems of the TPS. 

To derive the maximum benefit from this publi- 
cation, the reader must be thoroughly familiar 
with the functions and operation of all components 
of his System/360 Model 20. The publications de- 
scribing these components are listed in the SRL 
publication IBM System/360 Model 20, Bibliography , 
Form A26-3565. 
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Fourth., gdition (March, 1969) 



This is a major revision of, and obsoletes, C24-9009-2. 
The main changes are associated with the delivery of the 
IBM System/360 Model 20 Submodel 5, and with improvements 
and additions to IBM-supplied programs which are being made 
at the same time. Changes to the text, and small changes 
to illustrations, are indicated by a vertical line to the 
left of the change; changed or added illustrations are 
denoted by the symbol • to the left of the caption. 

This edition applies to the following program version and 
modification levels of the IBM System/360 Model 20 Tape 
Programming System, and to all subsequent versions and 
modifications until otherwise indicated in new editions or 
Technical Newsletters. 



Proqram No. 


V/M 
3/0 


Program No . 
360U-RG-148 


V/M 


360U-UT-131 


3/0 


360U-OT-132 


3/0 


360U-AS-149 


3/0 


360U-UT-133 


3/0 


360U-S/M-150 


3/0 


360U-UT-134 


3/0 


360U-I/C-151 


4/0 


360U-UT-135 


2/2 


360U-I/O-152 


4/0 


360U-SL-142 


3/0 


360U-CQ-154 


V1 


360U-SL-143 


3/0 


360U-SL-155 


1/0 


360U-SL-144 


3/0 


360U-SL-156 


1/0 


360U-SL-145 


3/0 


360U-CL-157 


1/0 


360U-SL-146 


3/0 


360U-CL-158 


1/0 


360U-SL-147 


3/0 


360U-CL-159 


1/0 



Changes are continually made to the specifications herein; 
before using this publication in connection with the 
operation of IBM systems, consult the latest SRL Newslett- 
er, Form N20-0361, for the editions that are applicable and 
current. 



This publication was prepared for production using an IBM 
computer to update the text and to control the page and line 
format. Page impressions for photo-offset printing were 
obtained from an IBM 1403 printer using a special print 
chain. 

Requests for copies of IBM publications should be made to 
your IBM representative or to the IBM branch office serving 
your locality. 

A form for readers' comments is provided at the back of this 
publication. If the form has been removed, comments may be 
addressed to IBM Laboratory, Publications Dept., P.O. Eox 24, 
Uithoorn, Netherlands. 
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INTBODUCTION 



This publication provides Model 20 opera- 
tors with the information required to (1) 
build a tape- resident system from IBM- 
supplied programs, (2) maintain this system 
by means of IBM-supplied programs, (3) 
execute IBM-supplied and user-written pro- 
grams under control of the tape-resident 
system, and (4) execute object programs 
under control of the card-resident system. 

A tape-resident system is used to con- 
trol the compilation, assembly, and execu- 
tion of the user's problem programs and the 
execution of IBM-supplied programs. The 
principal features and advantages of a 
tape-resident system are: the program 
library facility, the macro library facili- 
ty, batch job processing, selective phase 
loading, and automatic job-to- job 
transition. 

The card-resident system provides for 
stacked-job processing with automatic job- 
to-job transition. It is used to control 
the building of a tape-resident system and 
the execution of object programs contained 
in punched cards. The card-resident system 
offers tho advantage that all tape drives 
available can be used by the object 
program. 



TERMS AND ABBREVIATIONS 

The meaning of the terms and abbreviations 
used in this publication is defined in 
Appendi x C. Glo ssa ry . 



PREREQUISITES 

Readers of this publication should be fami- 
liar with the functions and the operation 
of all components of their System/360 Model 
20. The publications describing these com- 
ponents are listed in the Systems Reference 
Library publication IBM System/360 Model 
20, Bibliography, Form A 26- 35 65. 



SUMMARY OF IBM-SUPPLIED PROGRAMS 

The programming support which IBM supplies 
to users of tape-resident systems comprises 

• the Basic Assembler {tape versions) 

• the Control programs of the card- 
resident system 

• the Control programs of the tape- 
resident system 



the Service programs for the tape- 
resident system 

the TPS Report Program Generator 

the TPS Assembler program 

the TPS Sort/Merge program 

the TPS Utility programs 

Input/Output and Basic Monitor macro 
definitions. 



A number of IBM-supplied programs are 
executed under control of the card-resident 
system, others under control of the tape- 
resident system, and some can be executed 
under control of either system. Those pro- 
grams that are executed under control of 
the tape-resident system must be stored, 
together with the Basic Monitor program and 
the Job Control program of the tape- 
resident system, on a tape referred to as 
the system tape. The tape Basic Monitor is 
the first program on the system tape. It 
is followed by a program library, which 
contains the tape Job Control program and 
all other programs to be executed under 
control of the tape-resident system, and by 
an (optional) macro library, which contains 
the macro definitions. 

A brief description of the functions of 
each IBM-supplied program is given below. 

Basic Assembler (Tape Ver sion s) 

The tape versions of the Basic Assembler 
are stand-alone programs used to assemble 
source programs written in the Basic 
Assembler language. The operating proce- 
dures for these programs are described in 
the SRL publication IBM Sy ste m/360_ Model 
2Q^<.„ Card .Programming Support, Basic 

Assemble r ( T a p_ e_ V e r s ions) Operat i ng P roce - 

dures, Form C24-9011. 

Control Prog ram s (Card and. Tape) 

The Control programs of the card and tape- 
resident systems are: 

• The Initial Program Loader (IPL) 

• The Basic Monitor program 

• The Job Control program. 

The card-resident IPL, Basic Monitor and 
Job Control programs are grouped together 
for distribution, the three being known 
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collectively as the card-resident control 
programs. For tape-resident systems, the 
IPL is a separate program, but the Basic 
Monitor and Job Control programs are 
coupled together for distribution purpose 
and known as the tape-resident control 
programs. 

Ini tial Program Loade r (I PL) . The IPL is 

used to load the Basic Monitor program into 
main storage from cards or from the system 
tape, respectively. 

Bas ic Monitor Pr o gram . The Basic Monitor 
is the main control program. The card 
Basic Monitor is used to control the load- 
ing and execution of object programs con- 
tained in punched cards. It is also used 
to control the building of a tape-resident 
system. The tape Basic Monitor controls 
the loading and execution of (1) programs 
contained in the program library of the 
tape-resident system, (2) executable object 
programs stored 'on tape in card-image for- 
mat, and (3) executable object programs 
contained in punched cards. 

The. Job Contr o l Program . The Job Control 
program is loaded into main storage by the 
Basic Monitor. It prepares each individual 
program for execution under control of the 
Basic Monitor. The Job Control program 
operates between jobs only. It is not in 
main storage during the execution of a 
program. 



Service,, Programs 

The System Service programs comprise the 
Load System Tape program, the Copy System 
Tape program, the Linkage Editor program, 
and the Library Management programs. 

IPS Load Syste m T ape Program. The Load 
System Tape program is executed under con- 
trol of the card- resident system. Its only 
function is to build a tape-resident con- 
trol system. 

TPS Cop y System T ape Pr ogram. The Copy 
System Tape program is executed under con- 
trol of the card-resident system. It is 
used to copy a system tape onto another 
tape (e.g., from a 7-track tape onto a 9- 
track tape or vice versa) . 

TPS Linkage Editor Program. The Linkage 
Editor program can be executed only under 
control of the tape-resident system . It 
combines separately assembled programs or 
phases into an integral program that can be 
executed under control of the Basic Monitor 
program. The Linkage Editor program also 
performs any required relocations. 

The Linkage Editor program is used to 
process output of the Assembler program. 



It is not used in conjunction with the 
Report Program Generator. 

TPS, Library Management P r ograms . The 
Library Management programs are executed 
under control of the tape-resident system. 
They include the Maintenance and the Ser- 
vice programs for the program library and 
for the macro library, and the Display Ser- 
vice program. 

• The Maintenance program for the program 
library (also referred to as Core-Image 
Maintenance program) adds programs or 
phases to the program library or deletes 
them from it. This program can also be 
used to replace the Basic Monitor pro- 
gram on the system tape. 

• The Maintenance program for the macro 
library (also referred to as Macro Main- 
tenance program) adds macro definitions 
to, or deletes macro definitions from, 
the macro library. 

• The Service program for the program 
library (referred to as the Core-Image 
Service program) lists and/or punches 
the contents of the program library on 
the system tape. 

• The Service program for the macro 
library (referred to as the Macro Ser- 
vice program) lists and/or punches the 
contents of the macro library. 

• The Display Service program is used to 
print the contents of the core-image 
and/or macro directory of the user's 
tape-resident system. 

Other, IBM-Supplied., Programs 

In addition to the System Control and Ser- 
vice programs, the following programs are 
available to users of the tape-resident 
system. 

TPS Report Program Generator. The TPS 
Report Program Generator (RPG) translates 
source programs written in the RPG language 
into object programs. RPG programs are 
single-phase programs. They are not linked 
or relocated. Therefore, the Linkage Edi- 
tor program is not used with RPG programs. 

TPS Assembler^ Program and,, I/O and Basic 

Monitor^Macro,_Dgfinitipns, includin g I/ O 
Macro Definitions for the I BM 1419 and 1259 
Magnetic Character Readers. The TPS 
Assembler program translates source pro- 
grams written in the Assembler language 
into object programs. In conjunction with 
the Assembler program, IBM supplies macro 
definitions that can be used by this pro- 
gram. When an assembly is to be made, all 
macro definitions used must be contained in 
the macro library of the system tape. Pro- 
grams written in the Assembler language may 
be single-phase or multi-phase programs. 
Separately assembled programs can be linked 
and/or relocated by the Linkage Editor 
program. 
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TPS Sort/Merqe_Prggram. The TPS Sort/Merge 
program performs two functions. It (1) 
sorts a single file, which must be stored 
on magnetic tape, to a user-specified 
sequence, and (2) merges from two to five 
sorted tape files into one sorted tape 
file. The merging facility can also be 
used to sequence-check and/or reblock a 
single file while copying it. 



TPS Utility Programs. IBM supplies five 
Utility programs for Model 20 systems with 
magnetic tape equipment. Four of these 
Utility programs transfer data from one 
medium to another (from punched cards to 
magnetic tape, from one tape to another, 
from magnetic tape to punched cards, and 
from magnetic tape to a printer) . The 
remaining Utility program prepares and 
writes standard IBM tape volume labels. 
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INITIATION AND USE OF THE CARD-RESIDENT AND TAPE-RESIDENT SYSTEMS 



THE CARD-RESIDENT SYSTEM 

For a card- resident system, the card- 
resident Control programs are used. These 
programs, which must be contained in 
punched cards, are: 

• the Initial Program Loader 

• the Basic Monitor program 

• the Job Control program. 

The card-resident system can be used to 
execute IBM-supplied and user-written 
object programs contained in punched cards. 

Executable user object programs are 
obtained as punched output from the: 

1. TPS Report Program Generator, 

2. TPS Assembler program (if object pro- 
grams do not require linking and/or 
relocation) , 

3. TPS Linkage Editor program (if linking 
and/or relocation of assembled object 
programs was required) . 

The card-resident Control programs and 
the object programs form the skeleton of 
input for a card- resident system run. 



THE CARD INITIAL PROGRAM LOADER 

To initiate a system run, the Initial Pro- 
gram Loader (IPL) , preceded by a Clear 
Storage card, must be loaded into main 
storage from the reading device referred to 
as the loading unit. This loading unit is 
the 2501 Card Reader, or the 2520 Card 
Read-Punch, or the primary feed of the 2560 
MFCM, whichever is attached. 

During the loading and execution of the 
IPL program, a number of programmed halts 
may occur. The code displays associated 
with these halts and the appropriate 
restart procedures are described in the 
section Programmed-Halt Di splays an d 
Restart Procedures . 

To load the card Job Control program, 
read the job control statements, and load 
problem programs into main storage, a card 
reading device must be assigned to SYSRDR. 
The IPL card deck in the loading unit must 
be followed by an ASSGN card for SYSRDR. 
For this purpose, an ASSGN card allocating 
SYSRDR to an IBM 2501 card reader is pro- 



vided in the deck retrieved from the dis- 
tribution tape (see Figure 2) . If the user 
wishes to use a card-reading device other 
than the IBM 2501, this card must be 
replaced by one containing the correct spe- 
cification. See the ASSGN Control St ate- 
ment and Figure 50 in Appendix A. 



THE CARD BASIC MONITOR PROGRAM 

The IPL program loads the card Basic Mon- 
itor program from the loading unit into 
main storage. Therefore, the Basic Monitor 
deck must be placed into the hopper of the 
loading unit, immediately behind the ASSGN 
card for SYSRDR. 

The Basic Monitor program contains the 
logical unit table, which consists of 22 
logical unit blocks. Each logical unit 
block is used to associate a symbolic 
device address with a physical device 
address. The Basic Monitor contains stan- 
dard assignments for a number of symbolic 
device addresses. The remaining symbolic 
device addresses are not assigned. Figure 
1 shows the symbolic device addresses and 
the standard assignments. 



| Symbolic 


Add 


—i "" i 

ress | Physical Device Address | 
i ■ 


ISYSRES* 






| not assigned | 


ISYSRDR 






|not assigned | 


| SYSIPT 






12501 Card Reader | 


ISYSOPT 






| 2560 Secondary Feed | 


| SYSLST 






| 1403 Printer | 


ISYSLOG 






| 1403 Printer | 


| SYS000* 






|780 T2 | 


ISYS001* 






|781 T2 | 


| SYS002* 






|782 T2 | 


|SYS003* 






I 783 T2 | 


ISYS004* 






|78U T2 | 


| SYS005* 






|785 T2 | 


ISYS006 - 
i 


SYS 


015' 


Mnot assigned | 



* Only tape drives 
symbolic device 



can be assigned to these 
addresses 



Figure 1. Symbolic Device Addresses and 

Standard Assignments in the Card 
Basic Monitor Program 

The standard assignments for SYS000 
through SYS005 are contained in the six REP 
cards (REP in cols. 2-U) included in the 
Basic Monitor deck, immediately preceding 
the END card. Columns 17 through 20 of 
these cards contain the tape-drive 
addresses 0780 through 0785. If some or 
all of these standard assignments are to be 
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& 



Job Control Photo 3 



& 



/'Common* Cord - END OF JOB 
CONTROL PHASE 2. PLACE 
PROGRAM-DEPENDENT JOB 
CONTROL CARDS HERE. 



Job Control Phases 0, 1 and 2 



L 



ScZ 



/'Comment Card - START OF JOB 
CONTROL PROGRAM. PLACE ALL 
PHASES IN FRONT OF EACH 
OBJECT PROGRAM. 



Card Basic Monitor 



//ASSGN SYSRDR,X'100',R4 



Card Initial Program Loader 



^Figure 2. The Card-Resident Control Program Deck as Retrieved from the Distribution Tape 



changed, the corresponding REP cards must 
be replaced by new REP cards containing the 
desired information in cols. 17-20. 



Mote 1 : If REP cards 
assignment of 7-track 
track tape drives wit 
ture, ASSGN cards (su 
Control program) must 
to the correct REP ca 
appropriate specifica 
these specifications, 
of the ASSGN control 
A.) 



are used for the 

tape drives or 9- 
h compatibility fea- 
bmitted to the Job 

be used in addition 
rds to supply the 
tions. (For a list of 

see the description 
statement in A ppend ix 



Note_2j. If the user' s Model 20 system 
includes less than six tape drives and the 
standard assignments for some or all of 
these drives must be changed, the user need 
replace only those REP cards required to 
make the necessary changes. The remaining 
REP cards should be left, unchanged, in the 
Basic Monitor deck. 

A loading routine in the Basic Monitor 
program is used to load object programs 
from SYSRDR into main storage. This rou- 
tine is entered whenever a FETCH or EOJ 
macro instruction is encountered in a pro- 
gram. When the loading routine is entered 
through a FETCH macro instruction, the rou- 



tine immediately loads the (physically) 
next program from SYSRDR into main storage. 
The execution of an ECJ macro instruction 
causes a programmed halt to occur before 
the next program is loaded. 



The loading routine of the Basic Monitor 
program recognizes the following card types 
and performs the actions required for each 
type. 



C ard Type Action 



TXT 

END 

XFR 
REP 



The information in the card is 
loaded into main storage at the 
absolute address specified in 
the card. 

The card is ignored if it does 
not contain a transfer address. 
If a transfer address is pre- 
sent, control is transferred to 
that address. 

Control is transferred to the 
address specified in this card. 
Beginning at the address speci- 
fied in the card, the contents 
of main storage are replaced 
with the information contained 
in the card. 
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All other card types are ignored by the 
loading routine. 

The Basic Monitor program also contains 
physical tape I/O and error routines. This 
group of routines is entered whenever an 
I/O operation in a program refers to a tape 
drive. The routines provide for a number 
of programmed halts. The code displays 
associated with these halts are identified 
by a 7 in the S-field of the E-S-T-R 
register panel on the CPU console. When a 
halt of this type occurs, the operator must 
in most cases display additional data (such 
as the CSW, the CCW # sense data, or regist- 
er contents) to diagnose the error and 
determine the procedure to be followed. 

The halt-code displays and the appropri- 
ate restart procedures for all programmed 
halts that the Basic Monitor program pro- 
vides for are described in the section 
Proqrammed-Halt Displays and .„_ Best art 
Procedures. 



THE CABD JOB CONTROL PROGRAM 



The Basic Monitor loa 
program and the probl 
main storage from the 
SYSRDR. The Job Cont 
loaded only if Job Co 
gnment of device addr 
the date, etc.) are 
the problem program c 
executed under contro 
without a previous Jo 
Control run must alwa 
initiation time (i.e. 
problem program is lo 
furnish the Basic Mon 
information required 
configuration, etc.) . 



ds the Job Control 
em program (s) into 

device assigned to 
rol program need be 
ntrol functions (assi- 
esses, insertion of 
reguired. Otherwise, 
an be loaded and 
1 of the Basic Monitor 
b Control run. A Job 
ys be made at system 
, before the first 
aded and executed) to 
itor program with the 
for all jobs (date, 



In a stack 
advisable to 
decks, since 
requires Job 
ceded by a Jo 
performed by 
on the job co 
job control s 
cards and rea 
SYSRDR. Job 
issued for th 



ed-job environment, it is 
have several Job Control 
each problem program that 
Control functions must be pre- 
b Control deck. The functions 
the Job Control program depend 
ntrol statements issued. The 
tatements are punched into 
d from the device assigned to 
control statements may be 
e following purposes: 



Indicating the beginning of a set of job 
control statements and specifying the 
name of the program to be executed 
(JOB) . 

Inserting the date into the communica- 
tion region of the Basic Monitor program 
in main storage (DATE) . 

Altering the storage-capacity specifica- 
tion contained in the communication 



region of the Basic Monitor in main 
storage (CONFG) . 

• Updating an I/O device assignment of the 
Basic Monitor in main storage (ASSGN) . 

• Positioning a reel of tape by skipping 
the specified number of tape marks, 
starting from the present position, or 
by rewinding the tape to the load point 

I (FILES) . 

• Specifying the name of a tape file to be 
processed and the symbolic address of 
the drive on which this file is mounted 
(VOL) . 

• Supplying tape-label information for the 
tape file to be processed (TPLAB) . 

• Setting user-program switch indicators 
in the communication region of the Easic 
Monitor program (UFSI) . 

• Initiating tape error statistics (OPTN) . 

• Initiating the listing of control state- 
ments, and error statistics if requested 
(LOG) . 

• Suppressing the listing of control sta- 
tements, and error statistics if 
requested (NOLOG) . 

• Suspending system operation (PAUSE) . 

• Informing the Job Control program that 
the entire set of control statements has 
been read and control is to be returned 
to the Basic Monitor program (EXEC) . 

The cards containing the job control 
statements are normally prepared by the 
programmer. In some cases, however, the 
operator may have to prepare and insert 
such cards (e.g., DATE or ASSGN cards) to 
insure proper system operation. The for- 
mats of all job control statements are 
given in App endix A. 

Normally, the first statement of a set 
of job control statements is the JOB state- 
ment, and the last one is the EXEC state- 
ment. Only LOG, NOLOG, and PAUSE state- 
ments may precede a JOB statement. All 
other types of job control statements must 
appear between the JOE and EXEC statements 
as follows: 

• A TPLAB control statement must immedi- 
ately follow the associated VOL 
statement. 

• If, in a set of job control statements, 

a FILES statement and an ASSGN statement 
refer to the same symbolic I/O device 
address, the FILES statement must follow 
the ASSGN statement. 
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• The CONFG statement, if required, must 
precede the first TPLAB statement for a 
job. 

• All other job control statements may 
appear in an^ order between the JOB and 
EXEC statements. 

The JOB statement and the EXEC statement 
are required in any set of job control sta- 
tements. If it is intended to suspend sys- 
tem operation without terminating the sys- 
tem run, a PAUSE control statement must be 
issued. When the Job Control program 
encounters a PAUSE statement before it has 
read a JOB statement, it causes an immedi- 
ate halt. In this case, the Job Control 
program expects a set of job control state- 
ments to be read as soon as system opera- 
tion is resumed by pressing the Start key 
on the CPU console. When a PAUSE statement 
is encountered between a JOB and an EXEC 
statement, the Job Control program finishes 
reading the set, of control statements 
issued and causes a system halt immediately 
before the loading of the program is to 
begin. In this case, the Basic Monitor 
expects to load the program associated with 
the set of job control statements as soon 
as system operation is resumed by pressing 
the Start key on the CPU console. 

The programmed-halt codes that may be 
displayed during the execution of the Job 
Control program as well as the appropriate 
restart procedures are described in the 
section Programmed-Halt Displays and 
Restart Procedures. 



a) phases 00, 01 and 02 of the Job Con- 
trol program deck 

b) the cards containing the job control 
statements (for system initiation 
and for the first job) , and 

c) phase 03 of the Job Control program 
deck. 

Note: The job control statements 
must include a DATE statement. 

d) the problem program deck (or several 
stacked decks with Job Control decks 
and job control cards where 
required) . 

Note: A Job Control deck and job 
control cards are not required for 
second and subsequent programs in a 
job stream when the configuration 
and I/O- device assignments are the 
same and program-dependent job con- 
trol statements are not used. 

3. Press the Start key (s) of the loading 
unit and the device assigned to SYSRDR. 

4. If the printer is to be used, prepare 
and start this device. 

5. Prepare and start the I/O devices used 
by the first problem program to be 
executed. 

6. Set the Register-Data/Address switches 
on the CPU console to an even main- 
storage address between hexadecimal 
009C and the end-of-storage address 
minus hexadecimal 0052. 



PREPARATION OF A CARD-RESIDENT SYSTEM RUN 

The following steps must be taken to initi- 
ate a run of the card-resident system. 



1. 



Place into the hopper of the loading 
unit (2501 if attached; otherwise, 2520 
Card Read-Punch or primary feed of 2560 
MFCM) : 

a) the IPL deck, 

b) the appropriate ASSGN card for SYS- 
HDR (behind the IPL deck) , 

c) the Basic Monitor deck (behind the 
ASSGN card for SYSRDR) . 



2. Place into the hopper of the device 
assigned to SYSRDR: 



7. Set the Mode switch on the CPU console 
to PROCESS. 

8. Press the Load key on the CPU console. 

Figure 3 shows the arrangement of input 
for a card- resident system run. 



DESCRIPTION CF OUTPUT 

The output obtained from object programs 
executed under control of the card-resident 
system depends entirely on the type of out- 
put specified in these programs and, there- 
fore, must be identified with information 
supplied by the programmer. 
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Optional 



// PAUSE 



Card Job Control Program 
Phases 00. 01, 02 

Problem Progrom 



Card Job Control Program 
Phase 03 



Job Control Statements 



/Card Job Control Program 
| Phases 00, 01, 02 



Problem Program 




Problem Program 



(. 



y£- 

S Card Job Control Program 
| Phase 03 



// EXEC 



c 



s Program-Dependent 
i _Job Control Statements _ | I | 

_ ^^ -L-_-_r.-_- - - T! I } J 

^SSGN and/or CON FG "J | , t 

, i Stgtcmcnti 

f // DATE 



//JOB 



ni 



fCard Basic 



/Card Job Com 
I Phases 00. 01. 



Control Program 
" 02 



Monitor Program 



ASSGN SYSRDR.X'cuu'.dd 






Read on SYSRDR 



1 'j 
'I 



Read on the loading unit 



►Figure 3. Arrangement of Input for a Card-Resident System Bun 
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THE TAPE-RESIDENT SYSTEM 

Before any of the programs contained in the 
program library of the tape-resident system 
can be executed, a system run must be 
initiated; i.e., the tape Basic Monitor 
program must be loaded from the system tape 
into main storage. The loading of the 
Basic Monitor program is performed by the 
tape Initial Program Loader (IPL) . 



THE TAPE INITIAL PROGRAM LOADER 

If the tape Initial Program Loader is to be 
used, it must be contained in punched 
cards. The IPL deck is preceded by a Clear 
Storage card. The IPL program is loaded 
into main storage from the reading device 
referred to as the loading unit. This 
loading unit is the 2501 Card Reader or the 
2520 Card Read-Punch or the primary feed of 
the 2560 MFCM, whichever is attached. 

A number of programmed halts may occur 
during the loading and execution of the IPL 
program. The code displays associated with 
these halts and the appropriate restart 
procedures are described in the section 
Programmed-Halt Displays and Restart 
Procedures. 



ASSGN Cards for SYSRES and SYSRDR 



The IPL program 
itor program in 
system tape mou 
is no standard 
ASSGN card for 
is required . ( 
SYSRES must be 
card must be pi 
card of the IPL 
of the REP card 
section . 



loads the tap 
to main storag 
nted on SYSRES 
assignment for 
this symbolic 
The tape drive 
a 9-track driv 
aced directly 

program deck, 
s described in 



e Basic Mon- 
e from the 

Since there 

SYSRES, an 
device address 

assigned to 
e) . The ASSGN 
behind the END 

and in front 

the following 



If a card reading device other than that 
assigned in the tape Basic Monitor program 
is to be used as SYSRDR, an appropriate 
ASSGN card for SYSRDR must be placed behind 
the ASSGN card for SYSRES. 

The ASSGN card (s) must be followed eith- 
er by an end-of-file card (/* in columns 1 
and 2) or by REP cards followed by an end- 
of-file card. 

REP_Cards 

Six REP cards (REP in cols. 2-4 ) and an 
end-of-file card {/* in cols. 1-2 ) follow 
the END card of the IPL program deck supp- 
lied by IBM. They are used to furnish the 
tape Basic Monitor in main storage with the 
unit numbers of the tape drives attached to 
the Model 20. 



The REP cards supplied by IBM contain 
the physical device addresses 0780 through 
0785 in columns 17-20, where 07 is the 
attachment point (valid for any magnetic 
tape drive) , and 80 through 85 are the unit 
numbers to be inserted as standard numbers 
for six drives (maximum number of tape 
drives that can be attached to a Model 20) . 

The unit numbers (80-85) cannot be 
inserted or changed by ASSGN cards sub- 
mitted to the Job Control program. If the 
unit numbers of the user's tape drives are 
not 80-85, they can be inserted or changed 
in one of the following ways: 



1 . 



by in 
deck 
behin 
if th 
tape , 
(see 
Syste. 
and B 
fro 



eluding ASSG 
for the Load 
d the tape B 
e tape Basic 

behind the 
the sections 
m Tape from 

uilding Addi 

IBM- Supplied 



N cards in the input 

System Tape program 
asic Monitor deck or, 

Monitor is read from 
MONTR control card 

B uil ding the Initial 
IBM-Supplied Programs 
tional_ .System Tapes 

and Dser-Written 



2. 



Programs) ; 

by replacing the IBE-supplied REP cards 
behind the tape IPL deck with REP cards 
containing the unit numbers of the 
user's tape drives in columns 17-20. 



In the first case (ASSGN cards submitted 
to LDSYS) , the standard assignments of the 
tape Basic Monitor on the system tape are 
inserted. The REP cards behind the IPL 
deck may be removed to allow faster 
processing. 

In the second case (REP cards submitted 
to the tape IPL) , the standard assignments 
of the tape Basic Monitor in main storage 
are inserted or changed. The Basic Monitor 
program on the system tape is not affected. 



Ncte 1 : The REF cards indicate 
Basic Monitor only the attachme 
the unit numbers of the corresp 
drives. Therefore, if 7-track 
or 9-track tape drives with com 
feature are assigned by means o 
submitted to the IPL program, a 
ASSGN statements (submitted to 
trol program) must be used for 
priate tape characteristics spe 
(For a list of these specificat 
the description of the ASSGN st 
App_e n d ix_ A . ) 



to th 

nt poi 
onding 
tape d 
patibi 
f BEP 
dditio 
the Jo 
the ap 
cif ica 
ions , 
atemen 



e tape 
nt and 

tape 
rives 
lity 
cards 
nal 
b Con- 
pro- 
tions. 
see 
t in 



Note 2: If less than six tape drives are 
attached and the standard assignments for 
some or all of these drives are to be 
inserted or changed by means of REP cards, 
the user need replace only those EEP cards 
required to make the assignments for his 
tape drives. The remaining REP cards must 
be removed. 
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If the cor 
a particular 
means of ASSG 
system tape w 
are different 
IBM-supplied 
must be remov 
the end-of-fi 
ASSGH card fo 
if present) . 



rect standard assignments for 
Model 20 system were made by 
N statements at the time the 
as built, and the unit numbers 
from those contained in the 
REP cards, these REP cards 
ed from the IPL deck, so that 
le card directly follows the 
r SYSRES (or that for SYSRDR, 



Through the use of REP cards in an IPL 
procedure, a system tape that has been 
created for a particular Model 20 system 
can be used on other systems with different 
tape-drive unit numbers. The system tape 
is not modified, since only the Basic Mon- 
itor program in main storage is affected. 



THE TAPE EASIC MONITOR PROGRAM 



The tape Basi 
control progr 
tern. It cont 
which consist 
Each logical 
ate a symboli 
ical device a 
itor program 
dard assignme 
device addres 
device addres 
standard assi 
itor are show 



c Monitor progra 
am of the tape-r 
ains the logical 
s of 22 logical 
unit block is us 
c device address 
ddress. The tap 
supplied by IBM 
nts for a number 
ses. The remain 
ses are not assi 
gnments in the t 
n in Figure 4. 



m is the main 
esident sys- 

unit table, 
unit blocks, 
ed to associ- 

with a phys- 
e Basic Mon- 
contains stan- 

of symbolic 
ing symbolic 
gned. The 
ape Basic Mon- 



i : 1 1 

| Symbolic Address! Physical Device Address | 
,. + ., 

I SYSRES* fnot assigned 

| SYSRDR J2501 Card Reader 

ISYSIPT I 2501 Card Reader 

ISYSOPT | 2560 Secondary Feed 

ISYSLST | 1403 Printer 

I SYSLOG | 140 3 Printer 

ISYS000 - SYS015*lnot assigned 



Only tape drives can be assigned to these 
symbolic device addresses. 



Figure 4. Symbolic Device Addresses and 

Standard Assignments in the Tape 
Basic Monitor Program 

When the Basic Monitor program has been 
read into main storage, and insertions or 
changes (if any) of standard assignments 
have been made by means of the IPL program, 
control is transferred to the loading rou- 
tine of the Basic Monitor program. This 
routine loads the Job Control program and 
other programs from the program library 
into main storage. It is called initially 
by the IPL program and then either by the 
Job Control program or by a System Service 
or problem program that has just been 
executed. 



The tape Basic Monitor program also con- 
tains physical tape I/O and error routines. 
This group of routines is entered whenever 
an I/O operation in the program that is 
being executed refers to a tape drive. The 
routines provide for a number of programmed 
halts. The code displays associated with 
these halts are identified by a 7 in the 
S-field of the E-S-T-R register panel on 
the CPD console. When a halt has been 
caused in the tape I/O and error routines, 
the operator can in most cases display 
additional data (such as the CSW, the CCW, 
sense data, or register contents) to diag- 
nose the error and determine the procedure 
to be followed. 

The halt code displays and the appropri- 
ate restart procedures for all programmed 
halts that the tape Basic Monitor program 
provides for are described in the section 
?£OdOg§gdrHalt_DisElays and .Restart 
Procedures. 



THE TAPE JOE CONTROL PBOGRAE 

The Basic Konitor loads the Job Control 
program into storage both at system initia- 
tion time and before each program is 
loaded. The Job Control program processes 
the job control statements, which are read 
on the device assigned to SYSRDR. Job Con- 
trol statements may be issued to the tape 
Job Control program for the following 
purposes: 

• Indicating the beginning of a set of job 
control statements and specifying the 
name of the program to be executed next 
(JOB) . 

• Inserting the date into the communica- 
tion region of the Basic Monitor program 
in main storage (DATE) . 

• Altering the storage-capacity specifica- 
tion contained in the communication 
region of the Basic Konitor in main 
storage (CONFG) . 

• Updating an I/O device assignment in the 
Basic Konitor in main storage (ASSGN) . 

• Positioning a reel of tape by skipping a 
specified number of tape marks, starting 
from the present position, or ty rewind- 
ing to the load point (FILES) . 

• Specifying the name of a tape file to be 
processed and the symbolic address of 
the drive on which this file is mounted 

(VOL) . 

• Supplying tape label information (for 
later use) for the tape file to be pro- 
cessed (TFLAE) . 
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Setting user program switch indicators 
in the communication region of the Basic 
Konitor program (UPSI). 



• Initiating tape error statistics (OPTN) . 

• Initiating the listing of control state- 
ments, and error statistics if requested 

(LOG) . 

• Suppressing the listing of control sta- 
tements, and error statistics if 
requested (NOLOG) . 

• Suspending system operation (PADSE) . 



• Informing the Job Control program that 
the entire set of control statements has 
been read and control is to be returned 
to the loading routine (EXEC) . 

The cards containing the job control 
statements are normally prepared by the 
programmer. In some cases, however, the 
operator may have to prepare and insert 
such cards (e.g., DATE or ASSGN cards) to 
insure proper system operation. The for- 
mats of all job control statements are 
given in Appendix_A. 

Normally, the first statement in a set 
of job control statements is the JOB state- 
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Tape Job Control Phase 3 



Tape Job Control Phase 2 



Tape Job Control Phase 1 



Tape Job Control Phase 



r 



// CATAL 



// LOADC 



//END 



//ASSGN SYS005,X'785 , ,T2 



//ASSGN SYS004,X'784 , ,T2 



//ASSGN SYS003,X , 783',T2 



//ASSGN SYS002,X'782',T2 



// ASSGN SYS001,X'781 ',T2 



// ASSGN SYS000,X , 780',T2 



/Tape Basic Monitor 




X //MONTR 







iFigure 5. The Tape-Resident Control Program Deck as Retrieved from the Distribution Tape 
if Output in Punched Cards is Specified 
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ment, and the last one is the EXEC state- 
ment. Only LOG, NOLOG, and PAUSE state- 
ments may precede a JOB statement. All 
other types of job control statements must 
appear between the JOB and EXEC statements 
as follows: 



The CONFG statemen 
precede the first 
job. 

A TPLAB control st 
follow the associa 
If, in a set of jo 
a FILES statement 
•refer to the same 
the FILES statemen 
ASSGN statement. 
All other job cont 
appear between the 
ments in any order 



t, if required, must 
TPLAB statement for a 

atement must directly 
ted VOL statement, 
b control statements, 
and an ASSGN statement 
symbolic I/O address, 
t must follow the 

rol statements may 
JOB and EXEC state- 



The JOE statement and the EXEC statement 
are required in any set of job control sta- 
tements. If it is intended to suspend sys- 
tem operation without terminating the sys- 
tem run, a PAUSE statement must be used. 
When the Job Control program encounters a 
PAUSE statement before it has read a JOB 
statement, it causes an immediate halt. In 
this case, the Job Control program expects 
a set of job control statements to be read 
as soon as system operation is resumed by 
pressing the Start key on the CPU console. 
When a PAUSE statement is encountered 
between a JOB and an EXEC statement, the 
Job Control program finishes reading the 
set of control statements issued and causes 
a system halt immediately before the load- 
ing of the program is to begin. In this 
case, the Basic Monitor expects to load the 
program associated with the set of job con- 
trol statements as soon as system operation 
is resumed by pressing the Start key on the 
CPU console. 



At system initiation 
trol statement must be 
Control program. If th 
of the user's Model 20 
8K and a correct CONFG 
submitted to the Load S 
at the time the system 
CONFG card is also requ 
any other job control s 
the requirements of the 
executed. 



time, a DATE con- 
submitted to the Job 
e storage capacity 
system is other than 
card has not been 
ystem Tape program 
tape was built, a 
ired. The use of 
tatements depends on 

first job to be 



In the course of a system run, the Job 
Control program is loaded and executed 
whenever a program has reached the end-of- 
job. It reads the next set of job control 
statements from the device assigned to SIS- 
RDR and sets up the system for the job to 
be executed next. 

Execute -Loader Function 



The loading routine loads the object pro- 
gram in card-image format from the device 
assigned to SYSIPT and causes its immediate 



execution. When a FETCH macro instruction 
is encountered in the program, the loading 
routine is re-entered and the next program 
phase is loaded from SYSIET. When an EOJ 
macro instruction is encountered, control 
is returned to the loading routine of the 
Basic Monitor, which then loads the Job 
Control program, so that the system can be 
prepared for the next job. 

Note: The operand LOADER in an EXEC state- 
ment is ignored if the preceding JOB state- 
ment contained the operands 
RPG, prog ram- name. 

The programmed-halt codes that may be 
displayed during the execution of the Jot 
Control program as well as the appropriate 
restart procedures are described in the 
section Programme d-H alt Displays and 
Restart Procedures. 



TAPE EBBOR STATISTICS 

Subject to the restrictions listed below, 
it is possible to determine the number of 
tape errors that occurred while the problem 
program was being executed. 

Tape error statistics may be requested 
during Job Control time by means of the // 
OPTN control statement. If they are 
requested, the following information is 
collected for each physical unit used: 

1. Successful requests - total number of 
successfully completed tape operations 
requested by the problem program. 

2. Read errors - total number of read 
requests not successfully completed on 
the first attempt. 

3. Unrecoverable read errors - total numb- 
er of read requests not successfully 
completed after 100 attempts. 

4. Noise records - records of less than 12 
bytes in length. 

5. Write errors - total number of write 
requests not successfully completed on 
the first attempt. 

6 . Erase gaps - repositioning and cleaning 
of the tape reel by the Basic Monitor 
program to correct write errors. An 
erase gap is initiated and counted 
every time a write error occurs. 

To display tape and/or ESCA error stati- 
stics, the Job Control program must be 
reloaded after execution of the problem 
program. 

Restrictions : 

• The upper 280 bytes of main storage must 
be free. When submitting programs for 
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assembly, the user must ensure that this 
restriction is observed. The RPG pro- 
gram will free the upper 280 bytes for 
the generated object program if column 
35 of the control card contains a 
1-punch . 



Tape error statistics cannot be 
collected in IBM-supplied programs, 
except in the TPS Sort/Merge program and 
the TPS Utility programs TAPTAP, TAPPET, 
TAPCAR and CARTAP. 



PREPARATION OF A TAPE-RESIDENT SYSTEM RUN 

To initiate a run of the tape-resident sys- 
tem, the following steps must be taken by 
the operator (see also Figure 6) : 



1. Place into the hopper of the loading 

unit (2501 if attached; otherwise, 2520 
Card Read-Punch or primary feed of 
2560) : 



a) the tape IPL deck up to and includ- 
ing the END card; 



b) the ASSGN card for SYSRES; 



c) an ASSGN card for SYSRDR (if 
required) 



d) the (corrected) REP cards (if the 
standard assignments have not been 
changed by means of the Load System 
Tape program) ; 



e) the end-of-file card (/* in cols. 
1-2) . 



Mount the system tape on the drive 
assigned to SYSRES; press the Load- 
Rewind key and the Start key of the 
drive. 

Place into the hopper of the device 
assigned to SYSRDR: 

a) the JOB card for the first job to 
be executed; 

b) a DATE card; 

c) a CCNFG card (if the storage capa- 
city is other than 8K and the spe- 
cification in the Basic Monitor has 
not been corrected by means of the 
Load System Tape program) ; 

d) ASSGN cards for any 7-track tape 
drives or 9-track tape drives with 
compatibility feature that are to 
be assigned by the SEP cards fol- 
lowing the IPL deck; 

e) any job control cards required for 
the first job to be executed. 
(These job control cards must be 
terminated by an EXEC card) . 



If SYSRDR refers to that card 
reading device which is the 
loading unit, the cards read 
on SYSRDR follow those read on 
the loading unit in the hopper. 



Optional 



Optional 




Loading Unit SYSRDR 

Figure 6. Arrangement of Input for a Tape-Resident System Run 



SYSRES 
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4. Prepare the input/output devices 
required by the job to be executed. 

(Mount any reguired tapes and position 
them at load point, place any required 
card decks into the hoppers of the card 
devices used, install forms in the 
printer if it is to be used.) 

5. Press the Start keys of all I/O devices 
used . 



to prepare the system for the execution of 
one or more object programs: 



1. Place the set (s) of job control cards 
for the job (s) into the hopper of 
SYSRCR. 



Make sure that each set includes: 



6. Set the Register- Data/Address switches 
on the CPU console to an even main- 
storage address between hexadecimal 
009C and the end-of-storage address 
minus hexadecimal 0052. 

7. Set the Mode switch on the CPD console 
to PROCESS. 

8. Press the Load key on the CPU console. 

Figure 6 shows the arrangement of input 
for a tape-resident system run. 



EXECUTING OEJECT PROGRAMS UNDER CONTROL OF 
THE TAPE-RESIDENT SYSTEM 

Object programs can be executed under con- 
trol of the tape-resident system if they 
are: 

1. contained in the program library of the 
system tape, or 

2. stored on tape in card-image format, or 

3. contained in punched cards. 

The methods to include user-written 
object programs in the program library of a 
system tape are described in the sections 
Building Additiona l Sy stem Tapes f rom IB M- 
Supplied and User-W ritten Programs and 
Updating, the_Program__Librar y Section of a 
System Tape . 

Executable object programs on tape (in 
card-image format) or in punched cards are 
obtained as tape output from one of the 
following programs: 

1. The TPS Report Program Generator. 

2. The TPS Assembler program (if object 
programs do not require linking and/or 
relocation) . 

3. The TPS Linkage Editor program (if 
linking and/or relocation of assembled 
object programs was reguired) . 

Before any object program can be 
executed, a tape-resident system run must 
be initiated. The appropriate procedure is 
described in the preceding section. 

When the system run has been initiated, 
the operator must take the following steps 



a) a JOE statement with the name of 
the program or — in case of a 
multi-phase program -- the name of 
the first program phase to be 
loaded , 

b) ASSGN statements for all symbolic 
I/O addresses used in the program 
(unless the assignments are already 
in effect through standard assign- 
ments or ASSGN statements issued 
for a previous jot) , 

c) an EXEC statement without an 
operand if the program is contained 
in the library, or with the operand 
LOADER if the program is either 
stored on tape in card-image format 
or contained in punched cards. 

Note: If the program is to be run 
in Overlap mode, the operand RWC 
must appear in the EXEC statement. 

2. Prepare all I/O devices used by the 
program (s) , i.e., mount and position 
any required tapes, place any required 
card decks into the appropriate hop- 
pers, install forms in the printer if 
it is used. 

3. If several jobs are to be run and pre- 
paration of I/O devices is required 
between jobs, place a PAUSE card in the 
set of job control cards for any job 
that requires preparation. 

4. Press the Start keys of any required 
I/O devices that are not yet ready. 

5. Press the Start key on the CPU console. 

The halt codes that may be displayed 
owing to programmed halts in IBM-supplied 
programs, as well as the appropriate 
restart procedures, are described in the 
section Programmed^Halt Displays and 
l§s t ar t_Pr o cedu r es . 

Ihe codes and restart procedures for any 
user-programmed halts must be supplied by 
the programmer. 

The output obtained from user-written 
object programs executed under control of 
the tape-resident system depends entirely 
on the types of output specified in these 
programs and, therefore, must be identified 
according to information supplied by the 
programmer. 
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EXECUTIN G OE JECT PROGRAMS USING THE 1419/ 
1259" IOCS UNDER CONTROL OF THE 
CARD-RESIDENT OR TAPE-RESIDENT SYSTEM 

1419 System Preparation 

When an object program uses the IBM 1419 
Magnetic Character Reader, the following 
steps must be performed before the program 
is loaded: 

1. Press the appropriate Validity-Check 
and Readout keys on the 1419. 

Note: Press only those keys which 
correspond to the fields specified in 
the program to be executed. 

2. Press the Program-Sort key. 

3. Place documents face-up, inscribed edge 
against the feed hopper guide, on the 
loading platform. 

4. Set the batch numbering device (special 
feature) to its starting values. 

5. Press the Start key of the 1419. 

6. Set the Time-Sharing switch on the CPU 
to TIME-SHARING. 

141 9_ Interruption 

To interrupt the execution of a program, 
first press the Stop-Restore key of the 
1419. When document feeding in the 1419 
has stopped, press the Stop keys on the 
printer or the CPU. 

To resume execution, first press the 
Start keys on the CPU and the printer, then 
the Start key of the 1419. 

Unless the pocket light feature is used, 
the foot treadle may be pressed to tem- 
porarily stop the 1419 (e.g., to remove 
documents from a stacker) . 



125 9 System Preparation 

When an object program uses the IBM 1259 
Magnetic Character Reader, the following 
steps must be performed before the program 
is loaded: 

1 . Press the appropriate Validity-Check 
and Readout keys on the 1259. 

Note: Press only those keys which 
correspond to the fields specified in 
the program to be executed. 

2. Press the Reader-On-Line key. 

3. Place documents to be processed on the 
loading platform, face-up, with the 
inscribed edge of the document towards 
the machine. 

4. Press the Start key on the 1259. 

5 . Set the time-sharing switch on the CPU 
to TIME- SHARING. 



J25 9_ Interrupt ion 

Tc interrupt the execution of a program, 

first press the Stop key on the 1259 or the 

printer. Khen document feeding in the 1259 

has stopped, press the Stop key on the CPU. 

To resume execution, first press the 
Start keys on the CPU and the printer, then 
the Start key on the 1259. 

The Stop key of the 1259 may be pressed 
tc stop the 1259 temporarily, e.g., to 
remove documents from a stacker. 

M J I i s _ a nd_ E r r o r Displays 

System-error halts which may occur because 
of malfunctions of the 1419 or 1259 are 
described under Pr ogramme d-H alt_Displays 
and Restart Procedures. 



Have you any comments or opinions about 
this manual that you would like to pass on? 
If so, why not fill in the reader's suggestion 
sheet and send it to us 
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USING THE TPS REPORT PROGRAM GENERATOR 

The TPS Report Program Generator (RPG) 
translates source programs written in the 
RPG language into executable object pro- 
grams. If the RPG is to be used, it must 
be contained in the program library of the 
tape-resident system. 

RPG source programs can be either com- 
piled and executed in one job (compile-and- 
execute function) or compiled only. In the 
first case, the object program may, in 
addition to being executed immediately, be 
punched into cards or written onto tape 
before it is executed. In the latter case, 
the object program must be either punched 
into cards or written onto tape. 

It is not possible to compile RPG pro- 
grams with the read/compute, write/compute 
overlap feature of the Model 20. Therefore 
if the RPG source program is to be compiled 
only or compiled and executed in one job, 
this feature must not be specified in the 
RPG control card. 

RPG object programs contained in punched 
cards can be: 

1. executed under control of the card- 
resident system, or 

2. used as card input to the Core-Image 
Maintenance (CMAINT) program, i.e., 
they can be included in the program 
library of the user's tape-resident 
system, or 

3. executed under control of the tape- 
resident system by means of the 
execute-loader function, with SYSIPT 
assigned to a card reader. 

RPG object programs stored on tape (in 
card-image format) can be: 

1. executed under control of the tape- 
resident system by means of the 
execute-loader function, or 

2. used as tape input to the CMAINT pro- 
gram; i.e., they can be included in the 
program library of the tape-resident 
system. 

RPG object programs can also be included 
in the set of input phases (in cards or on 
tape) for the building of a tape-resident 
system. Refer to the appropriate sections 
of this publication for a description of 
the operating procedures. 



I/O DEVICE ASSIGNMENTS 

The following symbolic I/C device addresses 
are used to prepare and perform an RPG com- 
pilation under control of the tape-resident 
system: 

SYSRES — Required. Assigned at IPL time. 
Refers to the 9-track tape drive 
on which the system tape is 
mounted. 

SYSRDR — Required. 

Refers to the card reading device 
used for reading the jot control 
statements. 

SYSIPT — Required. 

Refers to the card reading device 
used for reading 

a) the RPG control card, 

b) the RPG source program. 

SYSLOG — Optional. 

Refers to the printer on which 
job control statements are 
listed. 

SYSLST ~ Optional. 

Refers to the printer on which an 
RPG listing is produced. 

SYS0P1 — Optional if the compile-and- 
execute function is used. 
Required if a source program is 
to be compiled only. 
Refers to the card punching 
device or tape drive on which the 
object program is produced in 
punched cards or in card-image 
format, respectively. 

SYS000 — Required. 

Refers to the tape drive on which 
a compilation work tape is 
mounted. 

SYS001 -- Optional. 

Refers to the tape drive on which 
a second compilation work tape is 
mounted. 

Ngte_ 1 : SYSGPT may refer to a tape drive 
only if two work tapes (on SYS000 and SYS- 
001) are used. 

Ncte_2: SYSRCR and SYSIPT may be assigned 
the same card reading device. SYSOPT and 
SYS000 may be assigned the same tape drive. 
The tape on SYSCPT is not rewound after an 
RPG compilation. Therefore, several object 
programs can be written on one tape. 
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However, the tape on SYS000 is rewound, so 
that only one object program can be written 
on the output tape if SYSOPT and SYS000 
refer to the same tape drive. 



CONTROL STATEMENTS 

Job Control S tat ements 

The following control statements must be 
issued to the Job Control program to set up 
the system for the execution of the Report 
Program Generator: 



// JOB RPG 



Required if the 
source program is 
to he compiled 
only. 



// JOB RPG , program-name Required if the 

compile-and-execute 
function is to be 
used (not to be 
used for programs 
in which RWC is 
specified) . 



// ASSGN 



// EXEC 



Required for any 
symbolic address 
whose device 
assignment in core 
storage is to be 
changed. 

Required. 



If the compile-and-execute function is 
used, any job control statements required 
for the execution of the object program 
(e.g., ASSGN, FILES, VOL, or TPLAB state- 
ments ) must be submitted together with the 
job control statements required for 
compilation . 

Note: The OPTN control statement must not 
be included in the job control statements 
for the TPS Report Program Generator. 

RPG__Control Card 

The deck of input cards to the TPS Report 
Program Generator must be preceded by an 
RPG control card. This control card must 
be prepared by the programmer or operator 
according to the functions required of the 
RPG compiler. The RPG control card is read 
from the device assigned to SYSIPT. 

The format of the RPG control card is as 
follows : 



Cols. 
1-5 



Contents 



Mean ing 



any EBCDIC Insignificant (may be 
characters used for sequence 
incl. blanks numbering, etc.). 



7-9 



10 



11 



17 



any EBCDIC 
characters 
incl. blanks 

P,C,or M 



blank 



Identifies the card as 
an RPG control card. 

Insignificant. 



Object program is to be 
punched or written on 
SYSCET. (It does not 
make any difference 
which of the three let- 
ters is used.) 
Object program is not to 
be punched into cards or 
written on tape. 



any EBCDIC Insignificant. 

character 

incl. blank 



12-14 blanks 
or 008 



012 



016 



024 



032 



15 blank 



16 I 



blank 



Object 
execut 
with a 
of 8K. 
Object 
execut 
with a 
of 12K 
Object 
execut 
with a 
of 16K 
Object 
execut 
Submod 
storag 
Object 
execut 
Submod 
storag 



program is to be 
ed on a Model 20 
storage capacity 

program is to be 
ed on a Model 20 
storage capacity 

program is to be 
ed on a Model 20 
storage capacity 

program is to be 
ed on a Model 20 
el 5 with a 
e capacity of 24K. 

program is to be 
ed on a Model 20 
el 5 with a 
e capacity of 32K, 



This column must be left 
blank. 



If input 
output- f 
be selec 
stacker 
input ca 
stacked 
If input 
output- f 
be selec 
stacker 
output c 
stacked 
No commo 
stacking 
insignif 



-file and 

ile cards are to 

ted to a common 

on the 2560, 

rds are to be 

first. 

-file and 

ile cards are to 

ted to a common 

on the 2560, 

ards are to be 

first. 

n stacker, or 

sequence 
icant. 



The shillings portion of 
a sterling-currency 
input field is in the 
IBM format. 

The shillings portion of 
a sterling-currency 
input field is in the 
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blank 



blank 



19 



blank 



20 



blank 



21 



blank 



22 



BSI format. 

The input does not con- 
tain sterling-currency 
fields. 



The pence portion of a 
sterling-currency input 
field is in the IBM 
format. 

The pence portion of a 
sterling-currency input 
field is in the BSI 
format. 

The input does not con- 
tain sterling-currency 
fields. 

The shillings portion of 
a sterling-currency out- 
put field is in the 
printer format. 
The shillings portion of 
a sterling-currency out- 
put field is in the IBM 
format. 

The shillings portion of 
a sterling-currency out- 
put field is in the BSI 
format. 

The output does not con- 
tain sterling-currency 
fields. 



The pence po 

sterling-cur 

field is in 

format. 

The pence po 

sterling-cur 

field is in 

format. 

The pence po 

sterling-cur 

field is in 

format. 

The output d 

tain sterlin 

fields. 



rtion of a 
rency output 
the printer 

rtion of a 
rency output 
the IBM 

rtion of a 
rency output 
the BSI 

oes not con- 
g-currency 



blank 



The Inverted-Print 
option is chosen (i.e., 
commas are used instead 
of decimal points) . 
The Inverted-Print fea- 
ture is not to be used. 

An additional input area 
for the 2501 is to be 
reserved in main 
storage. This may 
alternatively or addi- 
tionally be specified in 
column 32 of the File 
Description 
specification. 
An additional input area 
is not required. 



23-25 100 

or blanks 

120 



132 



144 



26 



blank 



27-30 xxxx 



blank 



31 



1 or 
blank 



32 



100 

regu 

prog 

120 

regu 

prog 

132 

regu 

prog 

144 

regu 

prog 



prm 

ired 

ram 

prin 

ired 

ram 

prin 

ired 

ram 

prin 

ired 

ram 



t po 

dur 
exec 
t po 

dur 
exec 
t po 

dur 
exec 
t po 

dur 
exec 



siti 

ing 

utio 

siti 

ing 

utio 

siti 

ing 

utio 

siti 

ing 

utio 



ons are 

object 

n. 

ons are 

object 

n. 

ons are 

object 

n. 

ons are 

object 

n. 



blank 



U2te_: The entries in 
these columns are used 
only if the file- 
description cards for 
the printer file do not 
contain block-length and 
record-length 
specifications. 

User's translation table 
is to be read during 
compilation to transl- 
ate, during the object 
run, alphameric fields 
for the purpose of alt- 
ering the collating 
seguence. 

Translation table is not 
to be read. 

Begin address of object 
program, in decimal 
notation (must be higher 
than 1663) . If the 
read/compute, write/ 
compute overlap feature 
is used (execution on a 
Submodel 5; W in col. 
38 of the TES EPG con- 
trol card) , the address 
must be 2100 or higher. 
BPG assumes object pro- 
gram to begin at (decim- 
al) address 1664 if the 
read/compute, write/ 
compute overlap feature 
is not used, or at 2100 
if the feature is used 
(execution on a Submodel 
5 only; W in col. 38 of 
the TES BEG control 
card) . 

BPG is to use one work 

tape (SYS000) for 

compilation. 

BPG is to use two work 

tapes (SYS000 and SYS- 

001) for compilation. 

The OPEN routine of the 
object program may be 
overlaid with I/O areas. 
The OPEN routine must 
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33 



34 



35 



38 



39 



blank 



any other 
EBCDIC 
character 
incl. blank 

1 



or blank 



not be overlaid with I/O 
areas. 

Note^ Column 32 must be 
left blank if: 

a) the compile-and- 
execute function is 
used; 

b) multi-reel files are 
to be processed by 
the object program; 

c) the user's program 
contains subroutines 
for standard user- 
label processing. 

Overlapped operation of 
upper and lower printer 
feeds (to increase 
execution speed) . 
Upper and lower printer- 
feed operation need not 
be overlapped (saves 
main storage) . 

Special look-up routine 
for sequential tables. 

Insignificant . 



During object time, tape 
error statistics will be 
requested by means of a 
// OPTN card. 

Note : When the operand 
of the JOB control sta- 
tement consists of RPG, 
program-name (compile- 
and-execute function) , 
no tape error statistics 
can be requested. 

During object time, no 
tape error statistics 
will be requested by 
means of a // OPTN card. 



36-37 any EBCDIC Insignificant, 
characters 
incl. blanks 



W 



blank 



any 

EBCDIC 
character 
incl. blank 



The object program is to 
make use of the read/ 
compute, write/compute 
overlap feature of the 
Submodel 5. 
The object program is 
not to make use of the 
feature. 

Insignificant. 



40 



41-74 



N No sign test will be 

performed on numeric 
fields of tape input 
files. 

blank Sign test is performed 
on all numeric input 
fields. 

any Insignificant. 

EBCDIC 

characters 

incl. blanks 



75-80 xxxxxx 



blanks 



These 

tain 

chara 

user ' 

first 

this 

writt 

tion, 

of th 

recor 

cters 

PHASE 

objec 

used 

if th 

inclu 

libra 

resid 

If th 

blank 

is as 



columns 
the name 
cters) of 
s program 

four cha 
name are 
en, durin 

into col 
e object 
ds. All 

appear i 

statemen 
t program 
as the ph 
e program 
ded in th 
ry of the 
ent syste 
e columns 
, the pro 
sumed to 



must con- 
(six 

the 
. The 
racters of 
punched or 
g corapila- 
umns 73-76 
program 
six chara- 
n the 
t of the 

and are 
ase name 

is 
e program 

tape- 
m. 

are left 
gram name 
be RPGOBJ. 



USER SUBROUTINES 

The user's assembled subroutines for 
extending the calculating routines provided 
by the EPG or for processing standard user 
labels may be inserted in the RPG source 
deck. 

The location of user subroutines and 
translation table in the RPG source deck is 
shown in Figure 7. 



PREPARATION GF THE SYSTEM 

The operator must take the following steps 
tc compile (or compile and execute in one 
job) programs written in the RPG language. 

1. If the tape Basic Monitor is riot yet in 
main storage, initiate the system run 
as described in the section Initiating 
a Tape-Resident System Run . 

2. Place the cards containing the set of 
job control statements (including the 
job control statements required by the 
object program if the compile-and- 
execute function is used) into the hop- 
per of SYSRER. 
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Note: If SYSRDR and SYSIPT refer to the 

same card reading device, the cards 
read on SYSIPT follow those read on 
SYSRDR in the hopper. 




A 



r 1 

-—--71 I 

( Tran slation Table ^^ ^^ 
»^er Routines j j L J^ 



* File-Extension Specs 

/File-Description Specs. 
/RPG Control Card 




{ Calculation Spe cs 
>TnputSpe 



SYSRDR SYSIPT 

Figure 7. Arrangement of Input for an RPG Compilation 



3. Place into the hopper of SYSIPT: 

a) the BPG control card; 

b) the source deck (RPG specifications 
cards) , consisting of: 

• the file-description specifica- 
tions cards, identified by an F 
in column 6 (one card for each 
file; at least one card is 
reguired) ; 

• the file-extension specifications 
cards, identified by an E in 
column 6 (optional; reguired if 
table files specified) ; 

• the input specifications cards, 
identified by an I in column 6 
(specifications cards for 
alphabetic-seguence records must 
precede those for numeric- 
seguence records within each 
file) ; 

• the calculation specifications 
cards, identified by a C in 
column 6 (optional; if used, 
cards specifying detail calcula- 
tions must precede those specify- 
ing total calculations) ; 

• the output- format specifications 
cards, identified by an in 
column 6 (reguired; all heading 
specifications cards, followed by 
all detail specifications cards, 
followed by all total specifica- 
tions cards for all files) ; 

c) an end-ox- file card (/* in cols. 
1-2, remaining cols, blank); 

d) the user's assembled subroutines (if 



any) ; 

e) an end-of-file card (if user subrou- 
tines are present) ; 

f) the translation table (if reguired) 
consisting of four cards identified 
by an S in column 6; 

g) an end-of-file card (if a transla- 
tion table is present) . 

Notei If SXSRDR and SYSIPT refer to 
the same card-reading device, the deck 
that is to be read from SYSIPT must 
immediately follow the EXEC card. 

If the printer is assigned to SYSLST 
and/or SYSLCG, press the Beset key and 
the Start key of the printer. 

Mount a work tape on the tape drive 
assigned to SYS000 and press the Load- 
Rewind key and the Start key of the 
drive. 

If the use of a second work tape has 
been specified, mount a second work 
tape on the tape drive assigned to SYS- 
001 and press the Load-Rewind key and 
the Start key of the drive. 

If the BPG object program is to be 
punched into cards, place blank cards 
into the hopper of the punching device 
assigned to SYSOPT. 

If the RPG object program is to be 
written onto a tape, mount an appropri- 
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ate tape reel on the tape drive 
assigned to SYSOPT and press the Load- 
Rewind key and the Start key of the 
drive. (Note that the work tape on 
SYS000 may be used as output tape.) 

9. Press the Start keys of any required 
I/O devices that are not yet ready. 

10. Press the Start key on the CPU console. 

Figure 7 shows the arrangement of input 
for an EPG compilation. 

If the compile-and-execute function is 
used, a halt occurs and the halt code 1D01 
is displayed in the E-S-T-R fields on the 
CPU console when the compilation of the RPG 
source program has been completed. The I/O 
devices required for execution of the com- 
piled program must now be prepared and 
started. The tape drive (s) used for the 
work tape (s) during compilation may now be 
used for data files. If the object program 
requires card input, tables (if any) must 
precede card data files when both are read 
from the same device. Note that card data 
files must be terminated by an end-of-file 
card. However, an end-of-file card must 
not be placed behind a card table file. To 
initiate execution, press the Start key on 
the CPU console. 

If the compilation is not to be followed 
by an execution, a halt does not occur and 
the next job is executed. 



1. Prepare the I/O devices for the next 

job. 

2. Set Data Switch 1 to position 3 to 
select the register to be altered. 

3 . Set the four Register-Data/Address 
switches to 00C2 (data to be entered 
into the selected register) . 

4. Set the Mode switch to ALTER REG. 

5. Press the Start key on the CPU console, 

6. The data entered into the register are 
displayed in the E-S-T-R registers. 
The number of the selected register is 
displayed as a four-bit binary number 
in the P register. 

7. Set the Mode switch to PROCESS. 

8. Press the Start key on the CPU console. 



MESSAGES 

During the compilation of a program written 
in the RPG language, the RPG compiler 
causes a number of messages to be listed on 
the printer (SYSLST) . Heading, diagnostic, 
and information messages may be printed. 
For a list of these messages and their 
meaning, refer to the SB! publication IEM 
System/360 Model 20, Disk and Tape, Program- 
ming Systems, Report Program Generator, 
Form C24-9001. 



PROGRAMMED HALTS 

A number of programmed halts may occur dur- 
ing the compilation and execution of pro- 
grams written in the RPG language. The 
halt-code displays and the associated 
restart procedures are described in the 
section ProgrammedjHalt Displays and 
Restart Pro cedure s . 

Several other halts can occur during the 
execution of RPG object programs. These 
halts occur when an arithmetic operation is 
performed on an invalid packed-decimal 
operand. They are identified by an opera- 
tion code displayed in the U-L fields on 
the CPU console. The following codes may 
be displayed: DE, F8 , F9 , FA, FB, FC, or 
FD. 

When one of these halts occurs, the job 
must be discontinued. The following steps 
must be taken to discontinue the job: 



DESCRIPTION OF OUTPUT 

The output obtained from an RPG compilation 
consists of: 

• a program listing and printed messages 
if the printer has been assigned to 
SYSLST; 

• the object program contained in punched 
cards if a card punching device has been 
assigned to SYSOPT; 

• the object program deck on tape in card- 
image format if a tape drive has been 
assigned to SYSOPT. 

If the compile-and-execute function is 
used, the output of the user's problem pro- 
gram is obtained in addition to the output 
of the compilation as described above (if 
the latter has been requested) . 
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USING_THE_TPS_ASSEMBLER_PROGRAM 

The TPS Assembler program translates source 
programs written in the Assembler language 
into object programs. If the TPS Assembler 
program is to be used, it must be contained 
in the program library of the user's tape- 
resident system.. 

A number of Input/Output and Basic Mon- 
itor macro definitions are supplied by IBM. 
These macro definitions must be contained 
in the macro library of the user's tape- 
resident system if the corresponding macro 
instructions are used in source programs to 
be processed by the Assembler. 

The source program to be assembled must 
be contained in punched cards. The object 
program produced by the Assembler can be 
either punched into cards or written onto 
tape. The object program may be executed 
immediately and/or included in the program 
library of a tape-resident system. Howev- 
er, if it requires linking and/or reloca- 
tion, it must be processed by the Linkage 
Editor program before it can be executed 
and/or included in the program library. 
(See the appropriate sections of this 
publication) . 

The Assembler program produces a listing 
of the assembled program on the printer 
assigned to SYSLST. If this listing is not 
desired, or if only the listing but no 
object program is desired, the appropriate 
control statements must be used. (Refer to 
the subsequent section Con trol Statements .) 



SYS001 ~ Required. 

Refers to the tape drive on which 
work tape 2 is mounted. 

SYS002 — Required if literals are to te 
processed. 

Refers to the tape drive on which 
the literal tape is mounted. 

SYSOPT — Required if an object program is 
to be produced in cards or on 
tape. 

Refers to the card punching 
device or tape drive on which the 
object program is to be produced. 

SYSLST — Required. 

Refers to the printer on which 
the program listing and other 
information may be printed. 

SYSLOG — Optional. 

Refers to the printer on which 
job control statements are 
listed. 

Ncte: SYSREE and SYSIPT may be assigned 
the same card reading device. SYSOPT and 
SYS002 may be assigned the same tape drive. 



CONTROL STATEMENTS 

j2i?]L.Control_Statements 

The following job control statements are 
used to set up the system for the execution 
of the Assembler program. 



// JCE ASSEME Required. 



I/O DEVICE ASSIGNMENTS 

The following symbolic device addresses are 
used in preparing and performing the execu- 
tion of the TPS Assembler program: 

SYSRES — Required. Assigned at IPL time. 
Refers to the 9-track tape drive 
on which the system tape is 
mounted. 

SYSRDR — Required. 

Refers to the card reading device 
on which the job control state- 
ments are read. 

SYSIPT — Required. 

Refers to the card reading device 
on which the program control 
statements (if any) , the Assembl- 
er source program cards, and an 
end-of-file card are read. 

SYS000 — Required. 

Refers to the tape drive on which 
work tape 1 is mounted. 



// ASSGN 



// EXEC 



Required for any symbolic 
address whose device 
assignment in core storage 
is to be changed. 

Required. 



Any other job control statements need be 
issued only if the corresponding functions 
are to be requested. 

Note: The CPTN control statement must not 
be included in the job control statements 
for the TPS Assembler program. 

Prog r^m_ Control _S tat ements 

Fcr the execution of the TES Assembler pro- 
gram, program control statements are not 
required. However, the user has the option 
to request a certain function, or the 
suppression of a function of the Assembler, 
by means of an AOPTN control statement. 

The name field of the AOPTN statement 
must be left blank. 
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The operation field contains the opera- 
tion code AOPTN. 



The operand field contains one or more 
of the following operands: 

O per and Funct ion Requ ested 

ENTRY An ENTRY statement is to be 

produced as the last record of 
the object program. (An ENTRY 
statement is required for the 
object program that is to be 
the last input program to the 
Linkage Editor.) 

LITERAL Literals are to be processed. 

(If this statement is not used, 
literals cannot be processed by 
the Assembler.) 

NODECK The object program is not to be 
punched into cards or written 
onto tape. 

NOERR The error listing is not to 

appear in the printed output. 
(The number of flagged state- 
ments is printed. ) 

NOESD ESD (External Symbol Dic- 
tionary) records are not to be 
included in the object program 
and the printed output. (The 
object program cannot be pro- 
cessed by the Linkage Editor.) 

NOLIST A program listing is not to be 
produced. (The number of 
flagged statements is printed.) 

NORLD RLD (Relocation Dictionary) 

records are not to be included 
in the object program and the 
printed output. (The object 
program cannot be relocated.) 

NOSYM A symbol table is not to appear 
in the printed output. 

If, for one assembly, the user wishes to 
request several functions, he may do this 
by issuing 

1. one AOPTN statement with several 
operands, or 

2. several AOPTN statements with one or 
several operand (s) each. 

If an AOPTN statement contains more than 
one operand, the operands must be separated 
from each other by a comma. An AOPTN sta- 
tement must be completely contained in one 
card. Continuation cards are not per- 
mitted. If both NODECK and NOLIST are 
requested for an assembly, an error halt 
occurs. 



Note: AOPTN statements are read on SYSIPT. 
They must precede the source statements. 



PREPARATION OF THE SYSTEM 

The following steps must be taken to pre- 
pare the system for the execution of the 
TPS Assembler program: 

1. If the TPS Basic Monitor is not yet in 
main storage, initiate the system run 
as described in the section Initiating 
a Tape-Resident, System Run. 

2. Place the cards containing job control 
statements into the hopper of SYSRDR. 

3. Elace into the hopper of SYSIPT: 

a) the cards containing the AOPTN 
statements (if any) , 

b) the source-program deck, concluded 
by an END card, 

c) an end-of-file card (/* in 
cols. 1-2) . 

Note: If SYSBDR and SYSIET have been 
assigned the same card reading device, 
the deck read on SYSIET must be placed 
behind the job control-card deck in the 
hopper of the device. 

4. Mount work tape 1 on the drive assigned 
to SYS000 and press the Load-Rewind key 
and the Start key of the drive. 

5. Mount work tape 2 on the drive assigned 
to SYS001 and press the Load-Rewind key 
and the Start key of the drive, 

6. If literals are to be processed (i.e., 
if an AOPTN LITERAL statement is pre- 
sent) , mount a third work tape on the 
drive assigned to SYS002 and press the 
Load-Rewind key and the Start key of 
the drive. 

7. If a card punching device has been 
assigned to SYSOPT, place blank cards 
into the hopper of the device. 

8. If a tape drive has been assigned to 
SYSOPT, mount an appropriate tape on 
the drive and press the Load-Rewind key 
and the Start key of the drive. (Note 
that the literal tape, if any, may be 
used as output tape.) 

9. Install appropriate forms in the print- 
er and press the Reset key and the 
Start key of the device. 

10. Press the Start keys of all required 
I/O devices that are not yet ready. 

11. Press the Start key on the CEU console. 

Figure 8 shows the arrangement of input 
to, and output from, the TPS Assembler 
program. 
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Note : SYSRDR and SYSIPT may be assigned the same card reading device. In that case, the cards read on SYSIPT follow those read on 
SYSRDR in the hopper. SYSOPT and SYS002 may be assigned the same tape drive. 

Figure 8. Arrangement of Input and Output of the Assembler Program 



PROGRAMMED HALTS 

A number of programmed halts may occur dur- 
ing the loading and execution of the TPS 
Assembler program. The halt-code displays 
and the associated restart procedures are 
described in the section Prog rammed-Hal t 
Displays .and Restart_Procedu res . 



MESSAGES 

The TPS Assembler causes a number of diag- 
nostic and information messages to be 
listed on the printer assigned to SYSLST. 
For a list of these messages and their 
meaning, refer to the SRL publication IBM 
System/360 Model .20, Disk and T ape Progra m- 



m ing S yste ms, Ass e mble r L anguag e , For m 
C2U-9002. 

OPERATOR INTERVENTION 

During macro generation, it is possible 
that the Assembler program enters a loop. 
To terminate the looping and continue pro- 
cessing, the operator must: 

• press the Stop key on the CPU console, 

• enter FF into location 00CE, 

• press the Start key on the CPU console. 

The macro generation during which the 
loop was entered is terminated, and the 
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message GENERATION TERMINATED BY OPERATOR'S 
INTERVENTION is printed. The assembly is 
continued . 



DESCRIPTION OF OUTPUT 

The output from the TPS Assembler program 
consists of: 

• the object program contained in punched 
cards or on tape in card-image format, 
and/or 

• printed output. 

Ob ject_ Program 

The object program is obtained on the 
device assigned to SYSOPT unless an AOPTN 
statement with the operand NODECK was used. 

The object program consists of: 

1. reproduced records (resulting from 
REPRO instructions issued before the 
START statement) ; 

2. ESD records for any External Symbol 
Dictionary items (except when NOESD was 
specified) ; 



3. problem program records (TXT and XFR 
records, RLD records for any relocat- 
able constants unless NCRLD was speci- 
fied, and reproduced records resulting 
from REPRO instructions issued after 
the START statement) ; 

4. END statement; 

5. ENTRY statement if ENTRY was specified. 

Printed Output 

Printed output is obtained on the printer 
(SYSLST) , except when NCIIST was specified. 

The output consists of: 

1. the External Symbol Dictionary (unless 
NOESD was specified) ; 

2. the listing of source and object 
statements; 

3. the Relocation Dictionary (unless NORLD 
was specified) ; 

4. the error listing (unless NOEBH was 
specified) ; 

5. one or more symbol tables (unless NOSYM 
was specified) . 
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USING THE TPS LINKAGE EDITOR PROGRAM 



JOB CONTROL STATEMENTS 



The TPS Linkage Editor program relocates 
assembled programs and/or combines separ- 
ately assembled program sections into an 
integral program that can be executed under 
control of the card-resident or tape- 
resident system. The required linkages and 
relocations are performed on the basis of 
the ESD and RLD information produced by the 
Assembler program. If the Linkage Editor 
program is to be used, it must he contained 
in the program library of the user's tape- 
resident system., 

The input to the Linkage Editor program 
can be contained in punched cards or stored 
on tape in card-image format. The output 
from the Linkage Editor program can be 
punched into cards or written onto tape in 
card-image format. 

I/O DEVICE ASSIGNMENTS 

The following symbolic device addresses are 
used in preparing and performing the execu- 
tion of the Linkage Editor program: 

SYSRES — Required. Assigned at IPL time. 
Refers to the 9-track tape drive 
on which the system tape is 
mounted. 

SYSRDR — Required. 

Refers to the card reading device 
on which job control statements 
are read. 

SYSIPT — Required. 

Refers to the card reading device 
or ta^e drive on which the input 
control section (s) is (are) read. 

SYSOPT — Required. 

Refers to the card punching 
device or tape drive on which the 
output phase (s) is (are) produced 

SYS000 — Required. 

Refers to the tape drive on which 
work tape 1 is mounted. 

SYS001 — Required. 

Refers to the tape drive on which 
work tape 2 is mounted. 

SYSLST ~ Optional. 

Refers to the printer on which 
output information and messages 
are listed. 

SYSLOG — Optional. 

Refers to the printer on which 
job control statements may be 
listed. 

N ote : SYSRDR and SYSIPT may be assigned 
the same card reading device. 



The following job control statements are 
used to set up the system for the execution 
of the Linkage Editor program: 



// JOB LNKEDT 
// ASSGN 

// £XEC 



Required. 

Required for any symbolic 
address whose device 
assignment in main storage 
is to be changed. 

Required. 



Any other job control statements need be 
issued only if the corresponding functions 
are to be requested. 



Note: The OPTN control statement must not 
be included in the job control statements 
for the TPS Linkage Editor program. 



ADDITIONAL INPUT STATEMENTS 

The Linkage Editor program uses the follow- 
ing additional input statements: 



PHASE 



ACTION 



ENTRY 



Required. Used to indicate 
to the Linkage Editor pro- 
gram that a new phase is to 
begin. One or more PHASE 
statements may be present 
in the input. The first 
input record must be a 
PHASE statement. 

Optional. Used to indicate 
to the Linkage Editor pro- 
gram that any following XFR 
and END cards are to be 
duplicated (operand: DUP) 
or that the duplication of 
XFR and END cards is to be 
discontinued (operand: 
NODUP) . 

Required. Must be the last 
input record read on 
SYSIPT. 



The formats of the Linkage Editor input 
statements are described in detail in the 
SRL publication IBM System/360 Model 20 , 
T ape P r ogramming Sy stem, Control a nd S er- 
vice Programs, Form C2U-9000. 

The PHASE and ENTRY statements may be 
produced by the Assembler program as a 
result of Assembler REPRO instructions and 
an AOPTN ENTRY statement, respectively. If 
they have not been produced, they must be 
prepared manually and included in the input 
read on SYSIPT. 
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The ACTIOS statement (s) , if used, must 
be included where required in the input 
read on SYSIPT. 



6. If SYSOPT has been assigned a card 

punching device, place blank cards into 
the hopper and press the Start key of 
the device. 



PREPARATION OF THE SYSTEM 

The following steps must be taken to pre- 
pare the system for the execution of the 
Linkage Editor program: 

1. If the TPS Basic Monitor program is not 
yet in main storage, follow the proce- 
dure described in the section Initiat- 
ing a Tap e -Re si dent _System Run . 

2. Place the cards containing the job con- 
trol statements into the hopper of the 
device assigned to SYSRDR. Press the 
Start key of the device. 

3. If SYSIPT has been assigned a card 
reading device, place the input deck, 
headed by a PHASE card and concluded by 
an ENTRY card, into the hopper of the 
device. Press the Start key of the 
device. 

N ote : If SYSIPT has been assigned the 
same device as SYSRDR, the deck read on 
SYSIPT must follow the last job control 
card in the hopper of SYSRDR. 

4. If SYSIPT has been assigned a tape 
drive and the input tape is not mounted 
and positioned from a previous job, 
mount the input tape on the drive and 
press the Load-Rewind key and the Start 
key of the device. 

5. Mount work tapes on the tape drives 
assigned to SYS000 and SYS001. Press 
the Load-Rewind keys and the Start keys 
of the devices. 



7. If SYSOET has been assigned a tape 
drive, mount an appropriate output tape 
on the drive, and press the Load-Rewind 
key and the Start key of the device. 

8. If the printer is to be used as SYSLOG 
and/or SYSLST, install appropriate 
forms, and press the Reset key and the 
Start key of the device. 

9. Press the Start key on the CPU console. 

Figure 9 shows the arrangement of input 
to and output from the Linkage Editor 
program. 



PROGRAMMED HALTS 

A number of programmed halts may occur dur- 
ing the loading and execution of the Link- 
age Editor program. The halt-code displays 
and the associated restart procedures are 
described in the section Programmed- Halt 
Displays and Restart P rocedure s . 



DESCRIPTION OF OUTPUT 

The output obtained from the Linkage Editor 
program consists of one or more linked and/ 
or relocated program phases contained in 
punched cards or stored on tape in card- 
image format. 

If the printer was assigned to SYSLST, a 
printout of information concerning the out- 
put phases is also obtained. 
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optional 




SYSLOG/SYSLST 



SYSOPT 



Note : SYSRDR and SYSIPT may be assigned the same card reading device. In that case, the cards read on SYSIPT follow those read on 
SYSRDR in the hopper. 

Figure 9. Arrangement of Input and Output of the Linkage Editor Program 
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U SING THE TPS SORT/MERGE PROGRAM 



The TPS Sort/Merge pr 
card-image format on 
IBM can be executed u 
the card-resident or 
tem. If it is to be 
of the card-resident 
contained in punched 
executed under contro 
system, it must be in 
library on the user's 



ogram contained in 
the tape supplied by 
nder control of either 
the tape-resident sys- 
executed under control 
system, it must be 
cards. If it is to be 
1 of the tape-resident 
eluded in the program 
system tape. 



The TPS Sort/Merge program consists of 
the following parts: 



Assignment - 
Internal Sorting - 
External Sorting - 
Merging 



- phases 0-7 

- phases 8-9 

- phases 10-11 

- phases 12-13 



Three types of job can be performed by 
means of the TPS Sort/Merge program:: 

1 . A single input tape file can be sorted 
and written onto tape in a specified 
order . 

2. Two to five sorted input tape files can 
be merged and written onto tape as one 
sorted file. 

3. A single sorted tape file can be 
sequence-checked and/or reblocked while 
being copied. 

I/O DEVICE ASSIGNMENTS 

The following symbolic I/O addresses are 
used in preparing and performing the execu- 
tion of the TPS Sort/Merge program: 



1 



.For_Sort_and_Merge_Runsi 



SYSRES — Required only for execution under 
control of the tape-resident sys- 
tem. Assigned at IPL time. 
Refers to the 9-track tape drive 
on which the user f s system tape 
is mounted. 

SYSRDR — Required. 

Refers to the card reading device 
used for reading the following: 

(1) Execution under control of 
the card-resident system — 
the Job Control program, the 
job control statements, the 
Sort/Merge program (including 
user routines, if present) , 
and the Sort/Merge control 
statements. 

(2) Execution under control of 
the tape-resident system — 
the job control statements, 
the Sort/Merge control state- 
ments, and user routines, if 
present . 



SYSLOGj — Required. 

Refers to the printer on which 
control statements and diagnostic 
messages are to be listed. 



2. Fo:: Sort Runs: 



SYS000 — Required. 

Refers to the tape drive on which 
the primary output tape is 
mounted. 

SYS001; — Optional. 

Refers to the tape drive on which 
an alternate output tape is 
mounted. (See the section Spe- 
cial Considerations for Multi- 
i Volume., Input and Output Files.) 

SYS002 — Required. 

Refers to the tape drive on which 
the primary input tape is 
mounted. 

SYS003J — Optional. 

Refers to the tape drive on which 
I an alternate input tape is 

mounted. (See the section Spe- 
cial Conside rat ions f or Mu lti- 
Volume Input and Outp ut Files . ) 

SYS004 — Required. 

Refers to the tape drive on which 
work tape 1 is mounted. 

SYS005 — Required. 

Refers to the tape drive on which 
work tape 2 is mounted. 

SYS006 — Required. 

Refers to the tape drive on which 
work tape 3 is mounted. 

SYS007 — Optional. 

Refers to the tape drive on which 
work tape 4 is mounted. 

SYS008 — Optional. 

Refers to the tape drive on which 
work tape 5 is mounted. 

SYS009 — Optional. 

Refers to the tape drive on which 
work tape 6 is mounted. 

Note: The following symbolic device 
addresses may be assigned the same tape 
drive: 

SYS00O and SYS002, 
SYS000 and SYS003, 
SYS000 and SYS004, 
SYS001 and SYS002, 
SYS001 and SYS003, 
SYS001 and SYS00U, 

SYS002 and the symbolic address for the 
last work tape, 
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SYS003 and the symbolic address for the 
last work tape . 

If SYS002 or SYS003 refers to the same 
drive as the symbolic address for the last 
work tape, a halt occurs and the code 1C41 
is displayed before any data is written on 
the input tape. This enables the user to 
save his input data and mount another tape 
on the drive. 

In a tape-resident system run, the drive 
assigned to SYSRES must not be assigned to 
any other symbolic device address. 

3. For Merge Runs: 

SYS000 — Reguired. 

Refers to the tape drive on which 
the primary output tape is 
mounted. 

SYS001 — Optional. 

Refers to the tape drive on which 
an alternate output tape is 
mounted. (See the section Spe- 
gij|l__.Consid_erations for Mult i- 
Volume Input and O ut put Fil es.) 

SYS002 — Required. 

Refers to the tape drive on which 
input tape 1 is mounted. 

SYS003 — Required except for sequence 

checking and/or reblocking only. 
Refers to the tape drive on which 
input tape 2 is mounted. 

SYS004 — Optional. Refers to the tape 
drive on which input tape 3 is 
mounted. 

SYS005 — Optional. Refers to the tape 
drive on which input tape 4 is 
mounted. 

SYS006 — Optional. Refers to the tape 
drive on which input tape 5 is 
mounted. 



// JCB SORT Required. 
// ASSGN 



// VOL 



// TPLAB 



// EXEC 



Required for any symbolic 
address whose device 
assignment in main storage 
is to be changed. 

Required for each tape file 
on which standard label 
checking is to be 
performed. 

Required whenever a VCL 
statement is issued. 

Required. 



Any other job control statements, such 
as OPTN, LOG, NOLOG, or FILES statements, 
may be included in the set if the corres- 
ponding functions are to be requested. 

Program Control Stat eme nts 

The TPS Sort/Merge program requires the 
following control statements: 

SORT or MERGE — Required for a sorting or 
merging job, respectively. 



RECORD 
INPFIL 
OUTFIL 
OPTION 

MODS 

END 



— Required. 

— Optional. 

— Optional. 

— Optional. Required for 
Restart runs. 

— Optional. Used if user 
routines have been added. 

— Required. Must be the 
last statement. 



These statements are written by the pro- 
grammer. The operator should ensure that 
all required statement cards are present. 



CONTROL STATEMENTS 

Jgb_ Con trol Statements 

If the Sort/Merge program is to be executed 
under control of the card-resident system, 
job control statements need be issued only 
if functions of the Job Control program are 
required. 

Whenever execution is to be controlled 
by the tape-resident system, job control 
statements must be issued. 

The following job control statements are 
used in conjunction with the TPS Sort/Merge 
program: 



USER ROUTINES 

If the user wishes to include his own rou- 
tines, the assembled routines (including 
the END card) must be 

a) inserted in the Sort/Eerge program deck 

(see Figure 10) if the card-resident 
system is to be used; or 

b) placed behind the Sort/Merge control 
cards in the hopper of SYSRDR if the 
tape-resident system is to be used. 
The tape error statistics option can be 
requested by including a // OETN control 
statement during the preceding Job Con- 
trol run (280 bytes of main storage will 
be used) . 
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Note : If data cards are to be read by a 
user routine from the device assigned to 
SYSRDB, they must be placed behind that 
routine in the hopper. The user is 
responsible for recognizing the end of his 
data. 



PREPARATION OF THE SYSTEM 

The following steps must be taken by the 
operator to prepare the system for the 
execution of the TPS Sort/Merge program. 

Car d-Besidgnt_ System 

1. If the system run has not yet been 
initiated, follow the procedure 
described in the section The Card- 
Re sident_ System . 

2. Place into the hopper of SYSRDR: 

a) phases 00, 01 and 02 of the Job Con- 
trol program; 

b) the cards containing the job control 
statements ; 

c) phase 03 of the Job Control program; 

d) the deck containing phases and 1 
of the Sort/Merge program; 

e) the cards containing the program 
control statements for the Sort/ 
Merge program; 

f) the deck containing phases 2-7 of 
the Sort/Merge program, followed by 
the user routines for the Assignment 
part, if any. (If data cards are to 
be read by these routines from the 
same device, they must follow the 
routines in the hopper) ; 

g) the deck containing phases 8 and 9 
of the Sort/Merge program, followed 
by the user routines for the Intern- 
al Sorting part, if any. (If data 
cards are to be read by these; rou- 
tines from the same device, they 
must follow the routines in the 
hopper) ; 

h) the deck containing phases 10 and 11 
of the Sort/Merge program, followed 
by the user routines for the Extern- 
al Sorting part, if any. (If data 
cards are to be read by these rou- 
tines from the same device, they 
must follow the routines in the 
hopper) ; 

i) the deck containing phases 12 and 13 
of the Sort/Merge program, followed 
by the user routines for the Merging 
part, if any. (If data cards are to 
be read by these routines from the 
same device, they must follow the 
routines in the hopper). 

3. Place into the appropriate hopper any 
data cards to be read by user routines 
from a card reading device other than 
SYSRDR. 



4. Press the Start key of each card read- 
ing device used. 

5. Press the Reset key and the Start key 
of the printer. 

6. Mount the required tapes on their 
drives and press the Load-Eewind key 
and the Start key of each drive used 
(except when tapes are positioned and 

ready from a previous job) . 

7. Press the Start key on the CPU console. 
Tape-Resident Sys tem 

1. If the system run has not yet been 
initiated, follow the procedure 
described in the section The Tape- 
Resident System . 

2. Place into the hopper of the reading 
device assigned to SYSEEB: 

a) the cards containing the job control 
statements , 

b) the cards containing the control 
statements for the Sort/Merge 
program, 

c) the assembled user routines (if 
any) . 

3. Place any data cards to be read by a 
user routine into the hopper of the 
appropriate device. 

4. Press the Start key of each card read- 
ing device used. 

5. Press the Reset key and the Start key 
of the printer. 

6. Mount the required tapes on their 
drives. Press the Load-Eewind key and 
the Start key of each drive used. 

7. Press the Start key on the CPU console. 

Figure 10 shows the arrangement of input 
decks for a sort/merge job under control of 
the card-resident system and the tape- 
resident system. 



SPECIAL CCNSIDEEATICNS FCB MULTI-VOLUME 
INPUT AND OUTPUT FILES 

When alternate input or output devices have 
been specified and a volume on one drive 
has been completely read or written, the 
program checks whether the other drive is 
ready. If it is ready, processing con- 
tinues without operator invention. If it 
is not ready, a programmed halt occurs. In 
this case, the halt code displayed on the 
CPU console identifies the cause of the 
halt and the appropriate restart procedure. 
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Job Con fro I Program 
Phases 00, 01, 02 



SYSRDR 

a) In a Card-Resident System Run 



SYSRDR 

b) In a Tape-Resident System Run 



'Figure 10. Arrangement of Input Decks for the Execution of the Sort/Eerge Program 



When alternate input or output devices 
have not been specified, which is always 
the case for input to merge runs, a pro- 
grammed halt occurs after a volume has been 
completely read or written. The halt code 
displayed on the CPU console identifies the 
cause of the halt and the appropriate 
restart procedure. 



One non-programmed halt may occur during 
execution of the Sort/Kerge program. This 
halt occurs when invalid packed-decimal or 
zcned-decimal data is encountered. The 
system halts, and the operation code "F8" 
is displayed in the U-I fields on the CPU 
console. In this case, the job must be 
discontinued. To discontinue the jot, 



PROGRAMMED HALTS 

A number of programmed halts may occur dur- 
ing the loading and execution of the Sort/ 
Merge program. The halt-code displays and 
the associated restart procedures are 
described in the section P roq ramm ed-Hal t 
Displa/s and Restart Proced ure s. 



prepare the I/C devices for the next 

job, 



• change the contents of register 3 to 
00C2, and 



press the Start key on the CPU console 
to initiate the end-of-job routine. 
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MESSAGES 

During execution, the Sort/Merge program 
causes a number of messages to be listed on 
the printer. Heading, diagnostic, and 
information messages may be printed. 

The messages that may occur and their 
meaning are described in the SRL publica- 
tion IBM System/360 Model 20, Disk and Tape 
Programming u Systems^ J1 Tape_Sort/Mer.ge Pr 07 
gram, Form C26-380U. 



DESCRIPTION OF ODTPUT 

The output of the TPS Sort/Merge program is 
produced on the tape drive assigned to SYS- 
000 and, if an alternate output device is 
used, on the tape drive assigned to SYS001 . 
For a sorting job as well as for a merging 
job, the output consists of one sorted file 
on one or more tape reels. 



CHECKPOINT AND RESTART PROCEDURE 

If the operand field of a SORT statement 
contains CKPT, the program periodically 
writes checkpoint records on the current 
(output) work tape during External Sorting. 
This option enables the user to 

a) interrupt the sorting jot at any time 
during External Sorting by pressing the 
Stop key on the CPU console, 

b) restart the job later at the beginning 
of the pass during which it was 
interrupted. 

External Sorting begins when the message 
**END OF PHASE 1** has been printed. It is 
completed when the message **END OF SORT** 
is printed. 

The execution of the program cannot be 
interrupted and restarted in this manner 
during Assignment, Internal Sorting, or 
Merging. 

A message is printed at the beginning of 
each external sorting level. The message 
printed is 

LEVEL nnnn 

where nnnn is the level number. 

The number in the right-hand portion of 
the LEVEL message is updated at the begin- 
ning of each level. When the last level is 
to begin, the message printed is 

LAST LEVEL 

To restart the interrupted sorting job, 
perform the following steps: 



1 . 



2. 



9. 



If the card-resident system is to be 
used, place the Job Control program (if 
used) into the hopper of SYSEER. 



Submit any job control statements 
required to set up the system exactly 
as it was set up for the original job 
(the same VOL and TFLflE statements, 
ASSGN statements to make the same 
device assignments, and any other job 
control statements originally sub- 
mitted) . If the card-resident system 
is to be used, place the cards contain- 
ing the job control statements between 
phase 02 and phase 03 of the job con- 
trol program. 



Remove the OPTION car 
the deck containing t 
trol statements origi 
Insert an OPTION card 
(additional) operand 
this operand, n must 
ginal job was interru 
message LAST LEVEL wa 
be 2 if the job was i 
the message LAST LEVE 



d (if any) from 
he Sort/Merge con- 
nally submitted. 

that contains the 
RESTAET=n. In 
be 1 if the ori- 
pted before the 
s printed; n must 
nterrupted after 
L was printed. 



If the card-resident system is used, 
place the program deck in its original 
arrangement behind the job control 
cards. If the tape-resident system is 
used, place the cards containing the 
Sort/Merge control statements as well 
as user routines (if any) behind the 
job control cards. 

Place any data to be read by user rou- 
tines in the appropriate hopper (s) . 

Press the Start key (s) of the card 
reading device (s) used. 

Mount the tapes that were used in the 
original job on the appropriate drives. 
If the job was interrupted during 
execution of the last level and the 
output file is a multi-volume file, 
mount the first volume for the file on 
SYS000 and, if alternate output has 
been specified, the second volume for 
the file on SYS001. 

Press the Load-Bewind key and the Start 
key of each tape drive used. 

Press the Reset key and the Start key 
of the printer. 



10. Press the Load key on the CPU console 
to restart the job. 

Processing is bypassed until the begin- 
ning of the sorting level during which the 
original job was interrupted has been 
reached. 
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U SING T HE TPS UTILITY PROGRAMS 

The TPS Utility programs contained in card- 
image format on the tape supplied by IBM 
can be executed under control of either the 
card- resident or the tape-resident system. 
For execution under the card-resident sys- 
tem, they must be contained in punched 
cards. For execution under the tape- 
resident system, they must be included in 
the program library of the user's system 
tape. 

Five Utility programs are supplied to 
the user: 

1. the Tape-to-Tape Utility program, 

2. the Tape-to-Card Utility program, 

3. the Card-to- Tape Utility program, 

4. the Tape-to-Printer Utility program, 

5. the Initialize- Tape Utility program. 



I/O DEVICE ASSIGNMENTS 

The following symbolic device addresses are 
used in preparing and performing the execu- 
tion of a Utility program: 

SYSRES — Required only for execution under 
control of the tape-resident sys- 
tem. Assigned at IPL time. 
Refers to the 9-track tape drive 
on which the user's system tape 
is mounted. 

SYSRDB — Required. Refers to the card 

reading device used for reading 
the following: 

1. Execution under control of the 

card-resident system — the 
Job Control program (if 
required) , the job control 
statements (if any) , phase C 
of the Utility program to be 
executed, the program control 
statement (s) , phases 1-4 of 
the Utility program, any user 
routines that may have been 
inserted (in the form of an 
integral assembled program) , 
and the remainder of the Uti- 
lity program. 

2. Execution under control of the 

tape-resident system — the 
job control statements, the 
program control statements, 
and user routines (if any) in 
the form of an integral 
assembled program. 



SYSLOG — Optional. Refers to the printer 
on which control statements are 
listed and messages are printed. 

SYSIPT — Required for file-to-file Utility 
programs only. Refers to the 
card reading device or tape drive 
used for reading the data to be 
transferred to another storage 
medium. 

SYSOPT — Required for all file-to-file 

Utility programs except the Tape- 
to-Printer program. Refers to 
the card punching device or tape 
drive on which the output file is 
produced. 

SYSLST — Required for the Tape-to-Printer 
Utility program. Refers to the 
printer which is used as output 
device. 

SYS000 — Required for the Initialize-Tape 
Utility program. Refers to the 
tape drive used as primary output 
device. For the Tape-to-Tape, 
Tape-to-Card, and Tape-to-Printer 
programs, SYS0O0 refers to the 
(optional) alternate input 
device. 

SYS001 -- Optional for the Initialize-Tape 
to Utility program. As many tape 
SYS005 drives as are available (maximum 
5) may be assigned as additional 
output devices. For the Tape-to- 
Tape and Card-to-Tape programs, 
syS001 refers to the (optional) 
alternate output device. 

Note: For the Card-to-Tape Utility pro- 
gram, SYSIPT may be assigned the same card 
reading device as SYSRDR. 



CONTROL STATEMENTS 

Job Co ntrol Statements 

If a Utility program is to be executed 
under control of the card-resident system, 
job control statements need be issued only 
if functions of the Job Control program are 
required. 

Whenever execution is to be controlled 
by the tape-resident system, job control 
statements must be issued. 

The following job control statements are 
used to set up the system for the execution 
of a Utility program: 

// JOB program-name Required. Specifies 

the name of the Utility 
program. 
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// ASSGN 



Required for any sym- 
bolic address whose 
device assignment in 
main storage is to be 
changed. 



// END 



Required after each set 
of volume-label image 
statements. 



// VOL 



// TPLAB 



// UPSI xxxxxxxx 



1 xxxxxxx 
xxxx 1xxx 

1xxx 1xxx 



// EXEC 



Required for any sym- 
bolic device on which 
standard label checking 
is to be performed. 

Required for standard 
label checking. Must 
follow the associated 
VOL statement. 

Required if user rou- 
tines are present and/ 
or no tape mark option 
is used. 

Possible operands: 
For user routines only. 
For no tape mark option 
only. 

For both user routines 
and no tape mark 
option. 

Required. 



Any other job control statements, such 
as DATE, OPTN, LOG, NOLOG, or FILES state- 
ments, need be issued only if the corres- 
ponding functions are to be requested. 



USER ROUTINES 

If the user wishes to include his own rou- 
tines, the assembled routines (one integral 
program) must be: 

a) inserted in the Utility program deck 

(see Figure 11) if the card-resident 
system is to be used; or 

b) placed behind the program control cards 
in the hopper of SYSHDR if the tape- 
resident system is to be used. 

The first two cards (Loader and Clear 
Storage cards) of the user's object deck 
must be removed. The last card (END card) 
remains in the deck. 

The user must supply an UPSI control 
statement with the operand 1 (in the set of 
job control statements) if he includes his 
own routines. 

The tape error statistics option can be 
requested by including a // CPTN control 
statement during the preceding Job Control 
run. (280 bytes of main storage will be 
used) . 



Program Control Statements 



The following program control statements 
are used with the file-to-file Utility 
programs : 



// U 



(Utility 
Modifier) 



Optional, 



// FS (Field- Select) Optional. 

// H (Print-Header) Optional (for Tape-to- 

Printer Utility program 
only) . 

// END Required. 

The following program control statements 
are used with the Initialize-Tape Utility 
program : 



// INITTP 



V0L1 - VOL! 



Required. 

Required if the operand 
CARD is specified in 
the INITTP statement. 
One to eight statements 
(called volume- label 
image statements) may 
be present for each 
output tape specified. 



PREPARATION OF THE SYSTEM 

The following steps must be taken to pre- 
pare the system for the execution of a Uti- 
lity program. 

Card-Resident System 

1. If the system run has not yet been 
initiated, follow the procedure 
described in the section The Card- 
Resident, System . 
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If SYSIPT is a card reading device 
(Card-to-Tape only) , place the data 
cards, terminated by an end-of-file 
card (/* in cols. 1-2) , into the hopper 
of SYSIPT. 



Note^ If SYSIPT is the same device as 
SYSRDR, remove phase 7 from the 
Utility-program deck in the hopper and 
place the data cards and the end-of- 
file card behind phase 6. Then, return 
phase 7 to the hopper. 



4. If a tape drive has been assigned to 
SYSIPT, mount the input tape on the 
drive, and press the Load-Rewind key 
and the Start key of the drive. 



5. If a tape drive has been assigned to 
SYSOPT, mount an output tape on the 
drive, and press the Load-Rewind key 
and the Start key of the drive. 

6. If alternate input and/or output 
devices have been assigned, mount the 
tapes on the drives (SYS000 and SYS001, 
respectively, and press the Load-Rewind 
keys and the Start keys of the drives. 



7. If the printer is to be used, install 
appropriate forms and press the Reset 
key and the Start key of the device. 

8. For the Initialize-Tape program, mount 
the tape (s) to be initialized on the 
drive (s) assigned (SYS000 etc.), and 
press the Load-Rewind key (s) and the 
Start key (s) of the drive (s) . 

9. Press the Start keys of all required 
I/C units that are not yet ready. 

10. Press the Start key on the CPU console. 

Figure 11 shows the arrangement of input 
for the execution of a Utility program 
under control of the card-resident system. 

Ta.£e-Eesident_System 

1 . If the system run has not yet been 
initiated, follow the procedure 
described in the section The Tape- 
E ®§i^en t_Sy s t e m . 

2. Place into the hopper of SYSBDR: 

a) the cards containing the job control 
statements , 

b) the cards containing the program 
control statements for the Utility 



S ' 

f Job Control Program I 



Tape-to-Printer Utility program only 
to be prepared by the user — — « 




Required for 

Tape Error Statistics 



Note: If SYSRDR and SYSIPT refer to 
the some card reading device, 
the data cards and the end-of- 
file card read on SYSIPT must 
be placed between phases 6 
and 7 of the utility program 
(Card-to-Tape). 



Input Data in Cards 




Job Control Program 
Phases 00, 01, 02 



SYSIPT 



required if Job Control 
functions must be performed 



•Figure 11. Arrangement of Input for the Execution of a Utility Program under Control of 
the Card-Resident System 
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program, 
c) the deck containing the assembled 
user routines (if any) . 

3. If SYSIPT is a card reading device 

(Card-to-Tape only) , place the data 
cards and an end-of-file card ■(/* in 
cols. 1-2) into the hopper of SYSIPT. 

Note.1 If SYSIPT is the same device as 
SYSRDR, the data cards and the end-of- 
file card must follow the program con- 
trol cards in the hopper of the device. 

4. Perform steps 4 through 10 described in 
the preceding section Car d-Resident 

Sys te m . 



in the section Progr a mmed-Halt ..Display sand 
Restart Procedures. 
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PROGRAMMED HALTS 

A number of programmed halts may occur dur- 
ing the loading and execution of a Utility 
program. The halt codes displayed and the 
associated restart procedures are described 



DESCRIPTION OF OUTPUT 

The output obtained from the Utility pro- 
grams depends on the type of job performed. 
According to the Utility program that has 
been executed, the output is obtained in 
cards, on tape, or on the printer. 



Don't forget the reader's suggestion sheet. By 
sending us your comments (complimentary or 
otherwise) you can help IBM produce better 
manuals for future readers. 
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CREATION AND MAINTENANCE OF SYSTEM TAPES 



HETRIEVIMG_AMD_ IDENTIFYING PROG RAMS.. STOKED 
ON THE IBM-SUPPLIED TAPE 

The IBM-supplied package consists of a 
"bootstrap" card and a distribution tape. 
The Distribution- Package Retrieval program 
is the first program stored on the distri- 
bution tape and is used to retrieve the 
desired elements (i.e., programs, samples, 
macro definitions and control statements) 
from the tape. These can then be executed 
or - if copied onto tape - used as input to 
the Load System Tape and Macro Maintenance 
programs. The bootstrap card is used to 
load the Distribution-Package Retrieval 
program. 



During Retrieval Program execution, the 
operator may skip the undesired elements 
stored on the distribution tape and may 
control the output of the program. The 
operator may also specify listing of the 
desired element, thereby suppressing any 
other output. 



The following sections describe: 

• the machine reguirements for the execu- 
tion of the Distribution-Package Retrie- 
val program, 

• the contents of the program package, 

• the operating procedures for the 
Distribution-Package Retrieval program, 
and 

• the identification of the program decks 
retrieved from the distribution tape. 



MACHINE REQUIREMENTS 

The minimum machine reguirements for the 
execution of the Distribution-Package Re- 
trieval program are: 

• 4096 bytes of main storage, 

• one card reading device, 

• one card punching device, 

• one printer, 

• one 2415 Magnetic Tape Unit (9-track 
drives, or 7-track drives with data con- 
version feature) . 



PROGRAM PACKAGE 

Each program, each macro definition, and 
each control statement on the distribution 
tape (with the exception of the 
Distribution-Package Retrieval program) is 
preceded by an 80-character header record 
in the following format: 



Cols. 
1-2 

3 
4-71 

72 



73 



Contents 

$$ 

Blank 

Title and blanks 

Classification : 

X: punched out by the Distribution- 
Package Retrieval program 

Y: punched out and copied onto tape 
by the Distribution-Package Re- 
trieval program. 

Z: copied onto tape by the 

Distribution-Package Retrieval 
program. The output may be 
changed by the user. 

Identification 



The last record on the distribution tape 
is a header record that contains the char- 
acters EOJ in the program-title field. 

Depending on the size of main storage 
and the number of available tape drives, 
the user has the following possibilities: 

A . 4096 B y tes of Ma in S tprage_and a Mini- 
mum of Two T ape Drives 

All programs to be run with this system 
must be copied into cards. These pro- 
grams are: 

1. Basic Assembler (Tape) . 

With this program the user can 
assemble his own programs written 
in the Easic Assembler language 
(refer to SRL publication IBM 
Syste m/360 Mod el 20, Card Program- 
ming Support, Basic Assembler (Tape 

Ver sions) Operati ng Procedures , 

Form C24-9011) . 

2. All tape Utility programs: 

TPS Tape-to-Tape Utility program 

TPS Tape-to-Card Utility program 

TPS Card-to-Tape Utility program 

TPS Tape-to-Printer Utility program 

TPS Initialize-Tape Utility program 

The programs must be run under con- 
trol of the card-resident Control 
I programs. 
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3. The Sample Program for the Basic 
Assembler (Tape) 

4. Part of Sample Program 3 for the 
Utility programs (refer to the sec- 
tion Sample Programs in this 
publication) . 

B • JJ 9.2. Bytes of Mai n Storage_and„Two n Tape 
D rive s 

In addition to the possibilities 
described above , the user can build a 
system tape consisting of the programs 
indicated by an asterisk in the listing 
of the contents of the distribution 
tape below. The programs that the user 
wishes to include in the system tape 
must first be punched from the distri- 
bution tape into cards. These program 
decks must be preceded by the Tape- 
Resident Control program as described 
in the section Building the_Ini tial 
S y stem Tape from IBM-Supp lied Progra ms . 

Furthermore, the user can execute 
the TPS Copy System Tape program and 
Sample programs 2 and 3. User programs 
may also be included on the system 
tape. 

Note: The Initial Program Loader for 
the tape-resident system must also be 
punched from the distribution tape into 
cards. 

c • 8 192 Bytes of Main St orage and_a_ Mini- 
mum, of Four Ta pe Drives 

In addition to the possibilities 
described under A and B, the user can 
copy all programs directly onto tape, 
with the exception of the X-classified 
programs. He can also execute all 
Sample programs. 

Note: The Initial Program Loader for 
the tape-resident system must also be 
punched from the distribution tape into 
cards. 



C on t e nt s_ o f _ t h e _ D i s t r i b u ti on Ta pe 

The distribution tape contains the follow- 
ing programs, control statements, and macro 
definitions in the specified sequence: 



Jeg. 

No. Program 

1 . Distribution-Package 
Retrieval program. 

2. TPS Initial Program Loader 
for Tape-Resident System. 

3. TPS Copy System Tape program. 



Classi- 
fication 



4. Basic Assembler (Tape) 4K. X 

5. Basic Assembler (Tape) 8K. X 

6. Sample for Basic Assembler X 
(Tape) . 

7. TPS Sample 1 (Assembler). X 

8. TPS Sample 2 (SPG) . X 

9. TPS Sample 3 (Utility and X 
Sort/Merge) . 

10. TPS Sample 4 (IBM 1419 Mag- X 
netic Character Reader) . 

11. TPS Sample 5 (BSCA ICCS) . X 

12. TPS Sample 6 (BSCA ICCS). X 

13. TPS Card-Resident Control X 
programs (IPL, Basic Monitor, 

and Job Control) . 

14. TPS Load System Tape program. X 

*15. TPS Tape-Resident Control Z 
programs. (Easic Monitor and 
Job Control) 

16. TPS Assembler program Z 

(Part 1) . 

*17. TPS Card-to-Tape Utility Y 

program. 

18. TFS Core-Image Maintenance Z 
program. 

19. TPS Core-Image Service Z 
program. 

20. TPS Directory Service Z 
program. 

♦21. TPS Initialize-Tape Utility Y 
program. 

22. TPS Linkage Editor program. Z 

23. TPS Macro Maintenance Z 
program. 

24. TPS Macro Service program. Z 
*25. TPS Report Program Generator. Z 

26. TPS Sort/Merge program. Y 

*27. TPS Tape-to-Card Utility Y 
program. 

*28. TPS Tape-to-Printer Utility Y 
program. 

*29. TPS Tape-to-Tape Utility Y 
program. 
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30. TPS Assembler program Z 

(Part 2) . 

*31. // END control statement. Z 

32. TPS Input/Output and Basic Z 
Monitor macro definitions, 

with interspersed // PRIOR 
and // CATAL statements, con- 
cluded by a // END control 
statement. 

33. Separate set of // PRIOR and X 
// CATAL statements, con- 
cluded by a // END control 
statement. 

34. TPS Input/Output macro Z 
definitions for the Binary 
Synchronous Communications 
Adapter, with interspersed // 
PRIOR and // CATAL state- 
ments, concluded by a // END 
control statement. 

35. Separate set of // PRIOR and Z 
// CATAL statements, con- 
cluded by a // END control 
statement. 

36. TPS Input/Output macro Z 
definitions for the IBM 1419 

and 1259 Magnetic Character 
Readers, with interspersed // 
PRIOR and // CATAL state- 
ments, concluded by a // END 
control statement. 

37. Separate set of // PRIOR and X 
// CATAL statements, con- 
cluded by // END control 
statement. 



OPERATING PROCEDURES FOR THE 
DISTRIBUTION-PACKAGE RETRIEVAL PROGRAM 

During execution, the Distribution-Package 
Retrieval program: 

• prints all header records together with 
a message indicating the operator's out- 
put specification, and 

• if specified, lists the selected 
element (s) (any other output is sup- 
pressed) , or 

• punches the selected element (s) of the 
distribution tape into cards, and/or 
writes the selected element (s) with a Y 
and Z classification onto the assigned 
output tape. 

To execute the Distribution-Package Re- 
trieval program, the following steps must 
be taken. 



1. Mount the distribution tape on a 2415 
tape drive. (9-track tapes must be 
mounted on 9-track drives; 7-track 
tapes must be mounted on 7-track 
drives. The data conversion feature is 
required when using 7-track tapes.) 

2. Press the Load-Rewind key and the Start 
key of the drive on which the distribu- 
tion tape is mounted. 

3. Place the IBM-supplied bootstrap card 
and a blank card in the hopper of the 
reading device (2501 if attached; 
otherwise, 2520 Card Read-Punch or 
2560, hopper 1) . 

4. If punched output is required, place 
blank cards in the hopper of the punch- 
ing device. (Hopper 1 if 2560 is 
used. ) 

5. Press START on each card I/O device 
used. 

6. Set the Register-Data/Address switches 
on the CPU console to 0E00. 

7. Set the Mode switch on the CPU console 
to PROCESS. 

8. Press LOAD on the CPU console. 

H alt 0BF0 occurs after the bootstrap card 
has been read into main storage. Continue 
as follows: 

9. Set the Mode switch on the CEU console 
to STOR ALTER. 

10. Set the Data switches on the CPU con- 
sole to the physical address of the 
tape drive on which the distribution 
tape is mounted (normally one of the 
numbers 80-85) . 

11. Set the Register-Eata/Address switches 
to OOFC. 

12. Press START on the CPU console. 

13. Set the Mode switch to PROCESS. 

14. Press START on the CPU console. 

Halt_0BF2 occurs after the Distribution- 
Package Retrieval program has been read 
into main storage. Continue as follows: 

15. Set the Mode switch to STCR ALTER. 

16. Set the Register-Eata/Address switches 
to OOFC. 

17. Set the Data switches to 

20 if a 2520 is used for punching 
42 if a 1442 is used for punching 
60 if a 2560 is used for punching 
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FF if listing is desired and other 
output is to be suppressed. 



Press START on the CPU console. 



19. Operator decision: 

Perform this step only if selected ele- 
ments are to be copied onto tape. 
Otherwise, bypass step 19 and continue 
with step 20. 

a) Mount an output tape on a 2415 tape 
drive. {9-track tapes must be 
mounted on 9-track drives; 7-track 
tapes must be mounted on 7-track 
drives. The data conversion feature 
is required when using 7-track 
tapes.) 

b) Set the Register-Data/Address 
switches to 00FD. 

c) Set the Data switches to the func- 
tional characteristics of the output 
tape as follows: 

CO — 1600 bytes/inch 9-track 

C8 — 800 bytes/inch 9-track 

10 — 200 bytes/inch 7-track with 

data conversion 
50 — 556 bytes/inch 7-track with 

data conversion 
90 — 800 bytes/inch 7-track with 

data conversion 

d) Press START on the CPU console. 

e) Set the Register-Data/Address 
switches to 00FE. 

f) Set the Data switches to the physi- 
cal address of the tape drive on 
which the output tape is mounted 
(normally one of the numbers 80-85) . 

g) Press START on the CPU console. 

20. Set the Mode switch to PROCESS. 

21. Press START on the CPU console. 

The Distribution-Package Retrieval program 
prints the header of the next element 
(i.e., program, sample, macro definition, 
or control statement) stored on the distri- 
bution tape and then halts. 

Halt 0BF7 occurs. Continue. as follows: 

22. Remove the previously punched deck 

(if any) from the stacker for marking. 

23. Operator decision: 

Bypass step 23 and continue with step 
24 if normal output of the element last 
announced by the printer is desired. 



24 



Normal, form of, output : X- c la ss e le - 

ments are punched, Y-class elements are 
punched and copied onto the output 
tape, Z-class elements are copied onto 
the output tape. If no output tape is 
assigned, Y- and Z-elements are 
punched. 

Other forms of output or skipping of 
the element last announced by the 
printer can be selected as described 
below. 

a) Set the Mode switch to STOR ALTER. 

b) Set the Register-Data/Address 
switches to one of these values: 

00FB: The element last announced by 
the printer is skipped. 

Y- .and, Z-elements only (specifica- 
tion ignored for X-elements) : 

00F8: The Y- or Z-element last 

announced by the printer is 
punched only. 

00F9: The Y-element last announced 
by the printer is copied onto 
t ; ape only. 

00FA: The Z-element last announced 
by the printer is punched and 
copied onto tape. 

c) Set the Data switches to a value 
other than FF. 

d) Press START on the CEU console. 

e) Set the Mode switch to PROCESS. 
Press START on the CPU console. 



Retrieval of the selected element begins in 
the specified form. "PRINTED" /'SKIPPED", 
"PUNCHED", "COPIED ", or "PUNCH, COPY" is 
printed beneath the announcement to in- 
dicate the form of output. 

S.§lt_0BF7 occurs to signal completed re- 
trieval. The next element stored on the 
distribution tape has been announced by the 
printer. 

25. If further elements are to be retri- 
eved, start again with step 22 of the 
procedure described above. 

"$$ EOJ" is announced by the printer after 
the last element has been retrieved from 
the distribution tape. 

Halts 

Any halts that occur during the loading and 
execution of the program are described, 
together with the appropriate restart pro- 
cedures, in the section Pr05rammed-Ha.lt 
,P4rS.Elays_and... Restart Procedures . 
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Program Title 



Basic Assembler (Tape) 4K 

Basic Assembler (Tape) 8K 

TPS Card-Resident Control programs 

TPS Initial Program Loader for Tape-Resident System 

TPS Tape-Resident Control programs 

TPS Load System Tape program 

TPS Core-Image Maintenance program 

TPS Macro Maintenance program 

TPS Copy System Tape program 

TPS Directory Service program 

TPS Core-Image Service program 

TPS Linkage Editor program 

TPS Assembler program 

TPS Input/Output and Basic Monitor macro definitions 

TPS Macro Service program 

TPS Input/output macro definitions for the IBM 1419 and 1259 

TPS Input/Output macro definitions for the Binary Synchronous 

Communications Adapter 
TPS Report Program Generator 
TPS Sort/Merge program 
TPS Tape-to-Tape Utility program 
TPS Tape-to-Card Utility program 
TPS Card-to-Tape Utility program 
TPS Tape-to-Printer Utility program 
TPS Initialize-Tape Utility program 
Sample for Basic Assembler (Tape) 
TPS Sample 1 



TPS Sample 
TPS Sample 
TPS Sample 
TPS Sample 
TPS Sample 



(1419 IOCS) 
(BSCA IOCS) 
(BSCA IOCS) 



| Program 


- " "i 

Erogram | 


|Name 


Identifi- | 




cation | 


i 






1 






1 — 




A | 


1 — 




B 1 


1 




E 1 


1 




F | 


| LDSYS 




H 1 


| CMAINT 




I | 


| KMAIMT 




J 1 


| CPSYS 




K | 


| CSEEV 




L | 


| CSEEV 




M | 


| LNKEDT 




N | 


| ASSEME 




| 


1 




P 1 


| KSEBV 




Q 1 


1 




Y i 


1 — 




Z 1 


| BPG 




R 1 


| SORT 




s 1 


| TAETAP 




T | 


| TAPCAR 




U 1 


| CARTAP 




V | 


| TAPPET 




W | 


| INITTP 




X I 


1 




A I 


1 




| 


1 




R 1 


1 




,W,or X| 


1 




Y 1 


1 




z 1 


1 




z 1 



'Figure 12. Summary of IBM-Supplied Programs 



Output of t he Dist ribution- Packa g e 
R etrieval Program 



Identification of the cards will be easier 
if they are first interpreted. 



a listing of all headers together with 
their output specifications, and 

listings of all elements selected to be 
listed, or 

card decks containing the elements 
selected to be punched, and, if step 19 
is to be performed, 

a tape containing the Y- and Z-elements 
selected to be copied in 80-character 
unblocked format. 



Ccl. 73 
Cols. 74-75 - 



Col. 76 
Cols. 77-79 - 



Col. 80 



Program identi 
Figure 12) . 
Phase number w 
gram, macro-de 
ber, or sample 
number (starti 
2 (identificat 
Consecutive ca 
within phase, 
tion, or sampl 
(leading zeros 
punched) . 
Reserved for i 



fication (see 

ithin pro- 
finition num- 

card-group 
ng with 90) . 
ion for TPS) . 
rd number 
macro defini- 
e card group 

are 

nsertions. 



IDENTIFICATION OF IBM-SUPPLIED PROGRAMS 



Figure 12 is a summary of the full 
titles, names, and identifications of the 
programs supplied by IBM. 



Columns 73 through 80 of the IBM-supplied 
program cards contain the following infor- 
mation that enables the user to identify 
and separate the decks punched by the 
Distribution- Package Retrieval program. 



In the card-resident Control programs, 
the Initial Program Loader, the Basic Mon- 
itor, and phases of the Job Control program 
are separated by an ASSGN and two comments 
cards as shown in Figure 2. 
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BUIL.DING, THE INITIAL SYSTEM TAPE FROM 
IBM-SUPPLIED_PROGRAMS_iLDSYS_RUNl 

The following steps must be taken to 
build a system tape from programs obtained 
as output from the Distribution-Package Re- 
trieval program. 

1. Place the card IPL deck, an ASSGN card 
for SYSRDR and the card Basic Monitor 
deck in the hopper of the loading unit. 
(The tape unit numbers in the REP cards 

of the Easic Monitor deck may have to 
be changed to the numbers of the drives 
actually attached.) 

2. Place in the hopper of SYSRDR: 

a) phase 00, 01 and 02 of the card Job 
Control program deck 

b) cards containing the following job 
control statements: 



3. 



// JOE 



LDSYS 



// DATE 

// ASSGN SYSIPT (if not 2501) 



// ASSGN SYSOPT 
// ASSGN SYS000 



// EXEC 



(tape drive) 

(if tape charac- 
teristics have 
to be added to 
the standard 
assignment) 



c) phase 03 of the card Job Control 
program deck 

d) the Load System Tape program deck 

If input for the LDSYS run is in 
punched cards, the tape-resident Con- 
trol programs (sequence number 15) must 
also have been punched into cards dur- 
ing execution of the Distribution- 
Package Retrieval program. Follow 
either procedure (a) or procedure (b) 
below. 

If input for the LDSYS run is from 
magnetic tape, follow procedure (c) . 

(a) If SYSIPT refers to the same 
card-reading device as SYSRDR: 

i. Insert into the deck contain- 
ing the tape-resident Control 
programs any new or replace- 
ment ASSGN and/or CONFG cards 
required to change the stan- 
dard entries in the tape 
Basic Monitor program to the 
actual configuration of the 



Model 20 system. (these 
cards must be placed immedi- 
ately after the Easic Monitor 
program — see Figure 5) . 



ii. Place into the hopper of the 
card-reading device: 



• the deck containing the 
tape-resident Control 
programs 

• the deck containing the 
user-selected programs 
(sequence numbers 15 to 29) 

to be included on the sys- 
tem tape, in the same order 
as they were punched by the 
Distribution Package Re- 
trieval program 

• a // END control card (to 
be prepared by the user) . 

(b) If SYSIPT refers to a card- 
reading device other than that 
assigned to SYSRER: 

i. Place into the hopper of 
SYSRDR: 

• the // ECNTE card from the 
tape-resident Control pro- 
gram deck (to be prepared 
by the user) 

• any ASSGN and/or CONFG 
cards required either to 
change the standard entries 
in the tape Easic Monitor 
program to the actual con- 
figuration of the Model 20 
system or to insert tape- 
drive assignments 

• a // END control card (to 
be prepared by the user) . 

ii. Place into the hopper of 
SYSIPT: 

• the remainder of the deck 
containing the tape- 
resident Control programs 

• the deck containing the 
user-selected programs 
(sequence numbers 16 to 30) 
to be included on the sys- 
tem tape, in the same order 
as they were punched by the 
Distribution Package Re- 
trieval program 

• a // END control card (to 
be prepared by the user) . 
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(c) If SYSIPT refers to a tape 
drive: 

i. Place into the hopper of 
SYSRDR: 

• a // MONTR control card (to 
be prepared by the user) 

• any ASSGN and/or CONFG 
cards required either to 
change the standard entries 
in the tape Basic Monitor 
program to the actual con- 
figuration of the Model 2C 
system, or to insert tape- 
drive assignments 

• a // END control card (to 
be prepared by the user) . 

ii. Mount on the drive assigned 
to SYSIPT the tape written by 
the Distribution Package Re- 
trieval program. Press the 
Load-Rewind key and the Start 
key of this drive. (The tape 
written by the Distribution- 
Package Retrieval program 
should contain the TPS tape- 
resident Control programs — 
sequence number 15.) 

Mount an output tape on the drive 
assigned to SYSOPT; press the Load- 
Rewind key and the Start key of the 
drive . 



5. Mount a work tape on the drive assigned 
to SYS000 (standard assignment) ; press 
the Load-Rewind key and the Start key 
of the drive. 



Press the Start keys of the required 
I/O units that are not yet ready. 



Set the Mode switch on the CPU console 
to PROCESS. 



Set the Register-Eata/Address switches 
on the CPU console to an even main- 
storage address between hexadecimal 
009C and the end-of-storage address 
minus hexadecimal 0052. 



9. Press the Load key on the CPU console. 

Upon completion of the Load System Tape 
program run, a system halt occurs and the 
code 0B20 is displayed in the E-S-T-R 
fields on the CPU console. 

The tape on the drive assigned to SYSOPT 
is now the system tape and includes the 
programs selected by the user, but not the 
macro definitions. 

If IBM-supplied macro definitions are to 
be included on the system tape, do not 
rewind the tape on the drive assigned to 
SYSIPT in the LESYS run. 
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INSERTING IBM-SUPPLIED MACROS IN THE MACRO 
LIBRARY_iMMAINT_RUNl 

The framework for a macro library is 
created during the LDSYS run. Macro 
definitions can, however, only be added to, 
or deleted from, the library by means of 
the MMAINT (Macro Maintenance) program. 
Therefore, if the system is to include a 
macro library, the MMAINT program must be 
included on the tape at retrieval time. 

This section describes the procedure for 
using the MMAINT program to include IBM- 
supplied macros in the library. It is also 
applicable when these macros are to be 
updated from modifications supplied by IBM. 

Further notes on the macro library, 
together with details of the procedures for 
deleting unwanted items and for adding 
user-written macro definitions will be 
found in the section Updating the Magro 
Library Section of a System Tape . 

The macro definitions supplied by IBM 
are contained on the distribution tape in 
three files: 

1 . TPS Input/Output and Basic Monitor 
macro definitions 

2. TPS Input/Output macro definitions 
for the Binary Synchronous Communi- 
cations Adapter 

3. TPS Input/Output macro definitions 
for the IBM 1419 and 1259 Magnetic 
Character Readers. 

Any or all of these files (depending on 
the user's reguirements) are retrieved from 
the distribution tape during the retrieval 
run. 

These files are now on the tape drive 
assigned to SYSIPT in the LDSYS run. Each 
file is preceded by a tape mark. On com- 
pletion of the LDSYS run, the tape is posi- 
tioned just before the first tape mark. 

If only the Input/Output and Basic Mon- 
itor macro definitions are to be used, one 
MMAINT run will be sufficient. If the sys- 
tem also includes the BSCA and/or a Magnet- 
ic Character Reader (1419 or 1259) , two or 
three additional MMAINT runs will be 
reguired to insert the macro definitions 
for these devices into the library. 

The steps to be performed for each addi- 
tional run follow the same pattern, as 
described below. 

1. Remove the file-protection ring from 
the system tape (on the drive assigned 
to SYSOPT in the previous run) , remount 
the tape on the drive, and press the 



Load-Rewind key and the Start key of 
the drive. 



Place in the hopper of 
unit: 

a) the tape IPL deck up 
ing the END card; 

b) an ASSGN card assign 
which the system tap 
SYSRES (this is the 
assigned to SYSCPT i 
previous MMAINT run ( 

c) an ASSGN card for SY 
device other than th 
is to be used) ; 

d) the (corrected) REP 
the correct assignme 
inserted in the tape 
by means of the LDSY 

e) the end-of-file card 
cols. 1-2) . 



the loading 

to and includ- 
ing the drive on 
e is mounted to 
drive that was 
n the LDSYS or 

s)) ; 

SRDR (if a 

e assigned one 

cards (unless 
nts were 

Basic Monitor 
S program) ; 

(/* in 



Place cards containing the following 
job control statements in the hopper of 
SYSRDR: 



// JOB 



MMAINT 



// DATE 

// ASSGN SYSIPT 

// FILES SYSIPT, 1 

// ASSGN SYSOPT 

// ASSGN SYS000 

// ASSGN SYSLST,UA 
// CONFG 



(same device as 
during LDSYS or 
previous MMAINT 
run (s) 

(used only if 
SYSIPT refers to 
a tape drive) 

(tape drive) 

(tape drive: 
reguired unless 
assignment was 
made during 
LDSYS) 

(required if the 
macro definitions 
are not to ba 
listed) 

Reguired if more 
than 8K bytes of 
main storage are 
available. 
(Allows faster 
processing) . 



// EXEC 



a) If SYSIPT refers to the same card 
reading device as SYSRDR: 

• remove the separate control-card 
deck (PRIOR and CATAL cards) from 
the output deck produced by the 
Distribution-Package Retrieval 
program; 
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• place the deck of macro defini- 
tions produced by the 
Distribution-Package P.etrieval 
program (beginning with a PRIOR 
card and a CATAL card, containing 
interpersed PRIOR and CATAL cards, 
and terminated by a // END control 
card) in the hopper of the device, 
behind the EXEC card. 

b) If SYSIPT refers to a card reading 
device other than that assigned to 
SYSRDR: 

• place the separate control-card 
deck produced by the Distribution- 
Package Retrieval program in the 
hopper of SYSRDR, behind the EXEC 
card; 

• place the deck of macro defini- 
tions, terminated by the // END 
card, in the hopper of SYSIPT. 
(The interpersed PRIOR and CATAL 
cards in the deck are ignored by 
the MMAI2JT program) . 

c) If SYSIPT refers to a tape drive, 
place the separate control-card deck 
produced by the Distribution-Package 
Retrieval program in the hopper of 
SYSRDR. The input tape en which the 
macro definitions are stored is 
still mounted on SYSIPT from the 
LDSYS or previous MHAINT run (s) ; 

5. If SYS000 refers to the same tape drive 
as in the preceding LDSYS or MMAINT 
run, the work tape is still mounted and 
positioned. 

If a different drive is used as SYS000, 
mount a work tape on the drive; press 
the Load-Rewind key and the Start key 
of the drive. 

6. Mount an output tape on the drive 
assigned to SYSOPT; press the Load- 
Rewind key and the Start key of the 
drive . 



7. If the printer (SYSLST) is used to list 
the macro definitions, press the Reset 
key and the Start key of the printer. 



Press the Start keys of any required 
I/O units that are not yet ready. 



9. Press the Load key on the CPU console 



After the IFL procedure, the KKAINT pro- 
gram is read into storage and executed. A 
number of programmed halts may occur during 
processing. The halt codes displayed and 
the appropriate restart procedures are 
described in the section Pro qr ammed-Halt 
Displays and. Rest art.. Procedures . 



On completion of the KKAINT run, the 
system halts, and code 0D10 is displayed in 
the E-S-T-R registers on the CEU console. 

The system tape, which now includes a 
macro library, is on the drive assigned to 
SYS0P1. 

If more macro definitions (i.e., those 
for the 1419/1259 and/or for the BSCA) are 
tc be included, additional KMAINT runs 
should be executed. Repeat steps 1 through 
9 described above, but note that SYSOPT 
from the previous run becomes SYSRES in the 
next run: SYSRES from the previous run can 
be assigned to SYSOPT in the next run. 

Figure 13 is an example of the tape 
handling to be carried out when a system 
tape is being created for a system with 
four tape drives, and when all three files 
of IBK-supplied macro definitions are 
required. If the 14-19/1259 macro defini- 
tions, but not those for BSCA IOCS are to 
be included in the macro library, the 
second MMAINT run represents the tape-drive 
handling for inclusion of the 1419/1259 
macro definitions. 
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Standard assignments 

1. Retrieval run 

(Bootstrap card) 



GENERATION_CF_A_SYSTEM_TAPE 
80 81 

SYS000 SYS001 



82 


83 


SYS002 


SYS003 


Worktape 


Distribution 


(=0utput) 
I 


Tape 
I 



LDSYS run 

Building the Initial 

System tape (without 

IOCS) 



3. 1st MMAINT run 
Creation off macro 
library, includes 
I/O and Basic Monitor 
macro definitions. 

4. 2nd MMAINT run 
Includes BSCA macro 
definitions 







Ring Off 

1 


Remove 


Worktape 
(=SYS000) 
I 


Worktape 1 

(=SYS0PT) 

1 


1 
1 

SYSIPT 

1 




I 

I 

I 
i 


1 
RinglOf f 

1 
i 


1 

| Do not 

j 'rewind 




1 
SYS000 

1 

1 

1 
1 


1 

SYSRES 

1 

Ring | On 

1 
1 


1 

SYSIPT 

1 

| Co not 
| rewind 
1 


Worktape 2 
( = SYSOPT) 

Ring Off 
1 


1 
SYS000 
■ 


1 

SYS0PT3 
■ 


1 

SYSIPT 


1 

SYSRES 
i 


1 

1 

1 
i 


1 

Ring |Of f 
1 


1 

| Eo not 
| rewind 


1 

Ring On 

1 
■ 


I 
SYSOCO 


1 

SYSRES 


1 

SYSIPT 


1 

SYSOPT* 



5. 3rd MMAINT run 

Includes 1419/1259 
macro definitions 

1 System tape, without macro library 

2 System tape, including I/O and Basic Monitor macros 

3 System tape, including I/O and Basic Monitor, and BSCA IOCS macros 

* System tape, including I/O and Basic Monitor, BSCA, and 1419/1259 ICCS macros 

Figure 13. Example of the Tape-Drive Handling Needed to Build a System Tape 
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UPDATING MODEL 20 TPS PROGRAMS FROM 
IBM-SUPPLIED PROGRAM MODIFICATIONS 

When maintenance of the Model 20 Tape Pro- 
gramming System is to be performed, the 
revised elements are supplied on a tape 
reel (or in cards) . The retrieval of the 
elements from such a distribution tape is 
performed in the same way as for initial 
retrieval. 

The distribution tape may contain the 
following items: 



Item 



1. 



Classi- 
fication 



Distribution-Package Retrie- 
val program. 



2. Any modified program phases X 
or programs for sequence num- 
bers 2 to 13 of the initial 
distribution tape. 

3. The modified Tape-Resident Z 
Control programs 

4. Any modified program phases identical 
or programs for sequence to the 
numbers 16 to 30 of the initial 
initial distribution tape. release 

If item 4 is present: 

5. /* control statement Z 

6. // END control statement X 

7. Separate set of // CATAL X 
statements, concluded by the 

// END statement. 

8. Any modified Input/Output Z 
and/or Basic Monitor macro 
definitions, with inters- 
persed // PRIOR and // CATAL 
statements, concluded by a // 
END control statement. 

If item 8 is present: 

9. Separate set of // PRIOR X 
and // CATAL statements, con- 
cluded by a // END control 
statement. 

10. Any modified Input/Output Z 
macro definitions for the 
Binary Synchronous Communica- 
tions Adapter, with inters- 
persed // PRIOR and // CATAL 
statements, concluded by a // 
END control statement. 

If item 1 is present: 

11. Separate set of // PRIOR X 
and // CATAL statements, con- 



cluded by a // END control 
statement. 

12. Any modified Input/Output Z 
macro definitions for the IEM 
1419 and 1259 Magnetic Char- 
acter Readers, with inters- 
persed // PRIOR and // CATAL 
statements, concluded by a // 
END control statement. 

If item 12 is present: 

13. Separate set of // PEICR X 
and // CATAL statements, con- 
cluded by a // END control 
statement. 

Updating of the initially distributed 
Model 20 TPS programs is described in the 
following paragraphs. 



Updating of Prggrams_Under Item 2, of the 
D istri buti on T ape 

All programs are card-resident. Replace 
the corresponding card decks. 

U£d_a.iing_of_Programs_under_Item 
±he._Jjistribution_Tap_e 

If the CMAINT program cannot be used on the 
available machine configuration, the master 
deck used for initial system generation 
must be updated by replacing the corres- 
ponding programs and/or phases. The new 
system can be built as described in the 
section Building the In itial Sy stem Tape 
f rom_ IBM-sup pli eg Programs. 

Vihen the CMAINT program can be used on 
the available machine configuration, updat- 
ing of the existing system tape is per- 
formed as described in the section Updating 
the Program Library Section, of a System 
Tape. 

The tape described in step 19 of the 
section Operating Proce dures fo r the 
Di s t r i b u t i o n - P a ck a ge_ R e t r i e v a 1_ P r o_g r am m ay 
be used as input to the CEAINT program. 
All control statements for the CMAINT pro- 
gram except the // FONTB and // END control 
statements for the TPS Basic Monitor pro- 
gram are made available under items 5, 6, 
and 7 of the distribution tape. These 
items are to be used under the following 
conditions: 

• If SYSIPT refers to a tape drive or a 
card reader other than that assigned to 
SYSRDR, item 7 of the distribution tape 
provides the complete set of // CATAL 
and // END statements. The /* control 
statement of item 5 must be placed 
behind the last phase selected by the 
user. 
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• If SYSIPT refers to the same card reader signments and the storage-capacity specifi- 

as SYSEDE, insertion of // CATAL state- cation can be changed when the Easic Mon- 

ments is not required since every phase itor program is replaced. 

retrieved is already preceded by a // 

CATAL control statement. However, the 

last card of the deck must be the // END 

statement and can be retrieved from item 

6 of the distribution tape. Ulflating of ..KacroDef ini tio ns under Items 

8/ 10 a and 12 of the Distribution Tape 

Figure 15 shows the arrangement of the 
input to the CMAINT program. By placing Updating of the macro definitions is ident- 
ASSGN and CONFG control statements behind ical to the procedure described in the see- 
the Basic Monitor program, and before the tion Inserting IBM-Supplied Macros in the 
first END statement, standard device as- J acro_ library. 
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COPYING A SYSTEM TAPE 



CONTROL STATEMENTS 



The user may wish to copy a system tape 
mainly for one cf the following reasons: 



1. to create an extra system tape, so that 
the information on the currently used 
system tape is not lost if the tape 
becomes unusable; 



2. to copy a 7-track system tape, which 

cannot be used to control a system run, 
onto a 9-track tape. 

The IBM-supplied Copy System Tape 
(CPSYS) program may be used to copy: 



• a 9-track tape onto a 9-track tape, 



If a Job Control run is required {e.g., for 
I/O device assignment) , the following job 
control statements must be issued to set up 
the system for the execution of the CPSYS 
program: 

// JOB CPSYS 
// EXEC 

The use of any other job control state- 
ments depends on the job control functions 
requested. 

Note: The CETN control statement must not 
be included in the job control statements 
for the CFS5S program. 

The CPSYS program does not require pro- 
gram control statements. 



• a 7-track tape onto a 9-track tape, 



• a 9-track tape onto a 7-track tape, 



• a 7-track tape onto a 7-track tape. 

The CPSYS program is executed under con- 
trol of the card-resident system. If it is 
to be used, it must be contained in punched 
cards. 



I/O DEVICE ASSIGNMENTS 

The following symbolic device addresses are 
used when the CPSYS program is to be 
executed. 



SYSRDR — Required. Refers to the card 

reading device on which the Job 
Control program (if required) , 
job control statements {if any) , 
and the CPSYS program are read. 



SYSIPT — Required. Refers to the tape 
drive on which the system tape 
that is to be copied onto another 
tape is mounted. 



SYSOPT — Required. Refers to the tape 
drive on which the tape is 
mounted that is to become a copy 
of the system tape on SYSIPT. 



SYSLOG — Optional. Refers to the printer 
on which job control statements 
are listed. 



PBEPABATICN OF THE SYSTEK 

The following steps must be taken to 
execute the CPSYS program under control of 
the card-resident system. 

1. If the card Basic Konitor program is 
not yet in main storage, follow the 
procedure described in the section The 
Card-Res ident System . 

2. If a Job Control run is required, place 
the following cards into the hopper of 
the device assigned to SYSRDR: 

a) phases 00, 01 and 02 of the Job Con- 
trol program deck, 

b) the cards containing the job control 
statements, and 

c) phase 03 of the Job Control program 
deck. 

3. Place the CPSYS program deck into the 
hopper of the device assigned to SYSRDR 
(immediately behind phase 02 of the Job 
Control program deck) . Press the Start 
key of the device. 

4. Kount the svstem tape to be copied on 
the tape drive assigned to SYSIPT; 
press the Load-Eewind key and the Start 
key of the drive. 

5. Mount the reel of tape onto which the 
system tape is to be copied on the tape 
drive assigned to SYSOPT, press the 
Load-Rewind key and the Start key of 
the drive. 

6. If the printer is to be used for list- 
ing job control statements, press the 
Reset key and the Start key of this 
device. 
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7. Press the Start key on the CPD console. in the section Programmed-Halt Displays and 

B§§tart_ Procedures. 

PROGRAMMED HALTS DESCRIPTION OF OUTPUT 

A number of programmed halts may occur dur- The output from the CPSYS program is a copy 

ing the loading and execution of the CPSYS of the system tape, obtained on the tape 

program. The halt codes displayed and the drive assigned to SYSCPT. The system tape 

associated restart procedures are described on SYSIPT remains intact. 
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UPDATING THE MACRO LIBRARY SECTION OF A 
SYSTEH__TAPEj. 

If the user wishes to use any macro 
instructions other than those provided by 
IBM in his source program, he writes his 
own macro definitions and includes them in 
the macro library of his tape-resident 
system. 

Macro definitions that are to be 
included in the macro library can be con- 
tained either in punched cards or on mag- 
netic tape in card- image format. 

Any macro definitions that are contained 
in the macro library but are no longer 
required by the user can be deleted from 
the library. 

The Macro Maintenance (MMAINT) program 
provides for the inclusion of IBM-supplied 
and user-written macro definitions in the 
macro library and for the deletion of macro 
definitions that are no longer required. 
This program must be included in the pro- 
gram library of the user's tape-resident 
system if the latter is to contain a macro 
library. The operating procedures for 
adding user-written macro definitions to, 
or deleting macro definitions from the 
macro library, by means of the MMAINT pro- 
gram, are described in the sections that 
follow. The procedure for inserting IBM- 
supplied macros into a macro library is 
detailed in the section Inserting IBM- 
Suppl ied Macros in the Macro Library. 

I/O DEVICE ASSIGNMENTS 

The following symbolic device addresses are 
used in preparing and performing the execu- 
tion of the MMAINT program: 

SYSRES — Required. Assigned at IPL time. 
Refers to the 9-track tape drive 
on which the system tape is 
mounted. 

SYSRDR — Required. Refers to the card 

reading device on which job con- 
trol statements and MMAINT con- 
trol statements are read. 

SYSIPT — Required if macro definitions are 
to be included in the library. 
Refers to the card reading device 
or tape drive on which the macro 
definitions are read. 

SYSOPT — Required. Refers to the tape 
drive on which the new system 
tape (with the updated macro 
library) is created. 

SYS000 — Required. Refers to the tape 
drive on which a work tape is 
mounted. 



SYSLST — Optional. Refers to the printer 
on which the macro definitions 
that are to be included in the 
library are listed. The printer 
is also used to list diagnostic 
and information messages. 

SYSLOG — Optional. Refers to the printer 
on which control statements are 
listed. 

Note: SYSRLR and SYSIPT may be assigned 
the same card reading device. 



CONTROL STATEMENTS 

J ob C ontrol St ate ments 

The following jot control statements are 
used to set up the system for the execution 
of the MMAINT program. 



// JOB MMAINT 
// ASSGN 



// CONFG 



// EXEC 



Required. 

Required for any sym- 
bolic address whose 
device assignment in 
core storage is to be 
changed. 

Required if more than 
8K bytes of main 
storage are available 
and if the configura- 
tion has not already 
been specified in this 
run. (Allows faster 
processing) . 
Required. 



Any other jot control statements need be 
issued only if the corresponding functions 
are to be requested. 

Note: The OPTN control statement must not 
be included in the job control statements 
for the MMAINT program. 

Pro gram Co ntrol Statem ents 

The MMAINT program requires the following 
control statements: 



// PRIOR n 



// CATAL 



// DELET macro 

or 

// DELET ALL 



Required. Must precede 
each set of DELET and/ 
or CATAL statements 
referring to one 
priority section. 

Required for each macro 
definition to be 
included in the macro 
library . 

Required for deleting 
one macro definition 
(or all macro defini- 
tions) contained in a 
priority section. 
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// END 



Required. Must be the 
last program control 
statement issued. 



The operand n in a PRIOR statement can 
be 1 through 4. Up to four PRIOR state- 
ments may be contained in a set of MMAINT 
control statements. If more than one card 
containing a PRIOR statement is present, 
the cards must be arranged in ascending 
order by n. 

The DELET and CATAL control statements 
(and the associated input) for each priori- 
ty section must be in alphabetical order by 
the operation codes of the macro instruc- 
tions to which they refer. This is illus- 
trated in the example below. 

// PRIOR 1 

// DELET BEXIT 

// CATAL (refers to DIVID) 

// CATAL (refers to MOVEZ) 

// DELET MULT 

// CATAL (refers to TEST) 

If a DELET statement with the operand 
ALL is issued for a priority section, the 
card containing this statement must be 
placed immediately behind the PRIOR card 
for that section. 



PREPARATION OF THE SYSTEM 

The following steps must be taken to pre- 
pare the system for the execution of the 
MMAINT program. 

1. If the system run has not yet been 
initiated, follow the procedure 
described in the section The_Tape^ 
Resident, System . 

2. Place into the hopper of the device 
assigned to SYSRDR: 

a) the cards containing the job control 
statements, 

b) the cards containing the program 
control statements for the MMAINT 
program. 

3. If a card-reading device has been 
assigned to SYSIPT, place into the hop- 
per of this device the card deck con- 
taining the macro definitions to be 
included in the library (each macro 
definition is headed by a MACRO state- 
ment and terminated by a MEND 
statement) ; 

Notej_ If SYSIPT has been assigned the 
same card reading device as SYSRDR, 
each macro definition to be included in 
the library must follow the correspond- 
ing CATAL card. 

4. If a tape drive has been assigned to 
SYSIPT, mount the reel of tape that 



contains the macro definitions to be 
included in the library, and press the 
Load-Rewind key and the Start key of 
the tape drive. 

5. Mount the reel of tape that is to 
accomodate the updated system tape on 
the tape drive assigned to SYSOPT, and 
press the Load-Rewind key and the Start 
key of the drive. 

6. Mount a work tape on the drive assigned 
to SYS000, and press the Load-Rewind 
key and the Start key of the drive. 

7. If the printer has been assigned to 
SYSLST and/or SYSIOG, press the Reset 
key and the Start key of the printer. 

8. Press the Start keys of any required 
I/O devices that are not yet ready. 

9. Press the Start key on the CFU console. 

Figure 14 shows the arrangement of input 
to and output from the MMAINT program. 



PROGRAMMED HALTS 

A number of programmed halts may occur dur- 
ing the loading and execution of the MMAINT 
program. 

The halt-code displays and the asso- 
ciated restart procedures are described in 
the section Programmed-Halt Displays and 
Restart Procedures. 



MESSAGES 

A number of diagnostic messages may be 
printed on the printer assigned to SYSLST 
during the execution of the MMAINT program, 

A list of these messages and their meaning 
is contained in the SRI publication I_EM 
System/360 -i Model_2Q 1 .Disk a nd T ape P r og ram- 
ming. Systems, Assembler. Language , Form 
C24-9002. 



DESCRIPTION OF OUTPUT 

The output from the MMAINT program is the 
updated system tape on the tape drive 
assigned to SYSOPT. If a printer was 
assigned to SYSLST, a listing of the 
included macro definitions (in source for- 
mat) , together with any required messages, 
is produced. 

Note: The updated system tape should be 
file-protected. 
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Note : SYSRDR AND SYSIPT may be assigned 
the same card reading device. In that 
case, the cards read on SYSIPT must 
be inserted in the deck read on SYSRDR, 
so that each macro definition follows the 
associated CATAL card. 



/?/ CATAL 
/// DELET ALT 
///PRIOR 2 



SYSRDR 




Job Control Statements 



SYSOPT SYS LOG/ SYSLST 

Figure 14. Arrangement of Input ana Output of the KKAIST Erogram 
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UPDATING THE PROGRAM LIBRARY SECTION OF A 
SYSTEM TAPE. 

The program library of a tape-resident sys- 
tem can be updated; i.e., program phases 
can be included in, or deleted from, the 
library. Both IBM-supplied and user- 
written program phases may be included or 
deleted. 

The updating is performed by an IBM- 
supplied service program referred to as the 
Core-Image Maintenance {CMAINT) program. 
If this program is to be used, it must be 
contained in the program library of the 
user's tape-resident system. 

A program phase can be either a complete 
single-phase program or a phase of a multi- 
phase program. A phase may have up to 9 
subphases. The program phases to be 
included in the library can be: 

1. phases of IBM-supplied programs; 

2. phases obtained as output from the TPS 
Report Program Generator; 

3. phases obtained as output from the TPS 
Assembler program (if they do not 
require linking and/or relocation) ; 

4. phases obtained as output from the TPS 
Linkage Editor program (if the output 
from the Assembler program required 
linking and/or relocation). 

5. phases obtained as output from the TPS 
Core-Image Service program. 

The input phases may be contained either 
in punched cards or on tape in card-image 
format. 

The Core-Image Maintenance program can 
also be used to replace the tape Basic Mon- 
itor program on the system tape, although 
this program is not contained in the pro- 
gram library. 



I/O DEVICE ASSIGNMENTS 

The following symbolic device addresses are 
used in preparing and performing the execu- 
tion of the CMAINT program: 

SYSRES — Required. Assigned at IPL time. 
Refers to the 9-track tape drive 
on which the system tape is 
mounted. 

SYSRDR — Required. 

Refers to the card reading device 
on which the cards containing the 
control statements are read. 



SYSIPT — Required if the Easic Monitor is 
to be replaced or phases are to 
be included in the library. 
Refers to the card-reading device 
or tape drive on which the Easic 
Monitor and/or the phases, ter- 
minated by an end-of-file card, 
are read. 

SYSOPT — Required. 

Refers to the tape drive on which 
the new system tape (with the 
updated program library) is 
created. 

SYS000 — Required. 

Refers to the tape drive on which 
a work tape is mounted. 

SYSLOG — Optional. 

Refers to the printer on which 
control statements are listed. 

Note: SYSRDR and SYSIPT may be assigned 
the same card reading device. 



CCNTRCL STATEMENTS 

Job_Control_Statements 

The following job control statements are 
used to set up the system for the execution 
of the CMAINT program: 
// JOB CMAINT Required. 



// ASSGN 



// EXEC 



Required for any sym- 
bolic address whose 
device assignment in 
main storage must be 
changed. 

Required. 



Any other job control statements need be 
issued only if the corresponding functions 
are required. 

Note: The OPTN control statement must not 
be included in the job control statements 
for the CMAINT program. 

Program Control Statements 

The CMAINT program requires the following 
control statements: 



// MONTR 



// CATAL 



Required only if the 
tape Basic Monitor pro- 
gram is to be replaced. 
If it is used, it must 
be the first control 
statement . 

Required for each phase 
to be included in the 
program library. 
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// DELET phase-name Required for each phase 

to be deleted from the 
program library. 

// END Required. Must be the 

last program control 
statement issued. (If 
the tape Basic Monitor 
program is to be 
replaced, another END 
control statement is 
required to indicate 
the end of that 
program.) 

The CATAL and DELET control cards (and 
the associated input phases) must be 
arranged in alphabetical order by the names 
of the phases to be included in, or deleted 
from, the program library. 

Not e: If the Job Control program is to be 
replaced, the phase and the associated 
CATAL control card must precede all other 
library phases and CATAL or DELET control 
cards, respectively. The Job Control phase 
must not be deleted by means of a DELET 
statement. 



PREPARATION OF THE SYSTEM 

The following steps must be taken to pre- 
pare the system for the execution of the 
CMAINT program. 

1. If the system run has not yet been 
initiated, follow the procedure 
described in the section The Tape- 
Resident System . 

2. Place into the hopper of the device 
assigned to SYSRDR: 

a) the cards containing the job control 
statements; 

b) the cards containing the program 
control statements for the CMAINT 
program. 

3. If a card reading device has been 
assigned to SYSIPT, place into the hop- 
per of this device the card deck con- 
taining the Basic Monitor program (if 
it is to be replaced) and/or the pro- 
gram phases to be included in the 
library (each phase is headed by a 
PHASE statement) and the end-of-file 
card . 



Notei If SYSIPT has been assigned the 
same card reading device as SYSRDR, the 
Basic Monitor deck (if any) must fce 
placed between the ECNTB control card 
and the first END control card, and 
each program phase to be included in 
the library must follow the correspond- 
ing CATAL card. 

4 . If a tape drive has teen assigned to 
SYSIPT and the reel of tape that con- 
tains the input phases is not mounted 
from a previous job, mount the reel on 
the drive and position SYSIPT by pres- 
sing the Load-Rewind key and the start 
key of the drive. 

5. Mount the reel of tape that is to 
accommodate the updated tape-resident 
system on the tape drive assigned to 
SYSOPT, and press the Load-Rewind key 
and the Start key of the drive. 

6. Mount a work tape on the tape drive 
assigned to SYS000, and press the Load- 
Rewind key and the Start key of the 
drive. 

7. If control statements are to be listed, 
press the Reset key and the Start key 
of the printer (SYSLOG) . 

8. Press the Start keys of any required 
I/O devices that are not yet ready. 

9. Press the Start key on the CPU console. 

Figure 15 shows the arrangement of input 
tc and output from the CMAINT program. 



PROGRAMMED HALTS 

A number of programmed halts may occur dur- 
ing the loading and execution of the CMAINT 
program. The halt-code displays and the 
associated restart procedures are described 
in the section Programmed-Halt Displays and 
Restart Procedures. 



DESCRIPTION OF OUTPUT 

The output from the CEAINT program is the 
updated system tape on the tape drive 
assigned to SYSOPT. The old tape-resident 
system (on SYSRES) remains intact and can 
immediately be used to perform further 
jobs. 
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Note : SYSRDR and SYSIPT may be assigned the same 
card reading device. In that case, the cards 
read on SYSIPT must be inserted in the deck 
read on SYSRDR as shown. 



t 



(L 



// END 



7/ DELET NAMED 



il 



// CATAL 



CATAL 



used if the Basic Monitor Progra 
is to be replaced 



optiona 




/ // DELET NAMEA 
////END 



/ ASSGN and/or CONFG y d. 

1 Statements ' 



Tape Basic Monitor 
Program 



SYSRDR 




System / 360 
Model 20 



SYS000 



SYSOPT 



PHASE NAMEC,... 



PHASE NAMEB,... 




SYSIPT 




SYS RES 




SYS LOG 



Figure 15. Arrangement of Input and Output of the CMAINT Prograi 
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DISPLAYIliG_DIBECT_OEIES 

Both the program library and the macro 
library of a system tape contain entries 
that form a directory to their contents. 
These directories, which are referred to as 
the core-image directory and the macro 
directory, respectively, can be listed on 
the printer by means of the IBM-supplied 
Directory Service (DSERV) program, thus 
affording a survey of the contents of each 
library at any time. 

If the DSERV program is to be used, it 
must be contained in the program library of 
the tape-resident system. 

Either one or both of the directories 
may be displayed in one job. 



I/O DEVICE ASSIGNMENTS 

The following symbolic device addresses are 
used in preparing and performing the execu- 
tion of the DSERV program: 

SYSRES — Required. Assigned at IPL time. 
Refers to the 9-track tape drive 
on which the system tape is 
mounted. 

SYSRDR — Required. Refers to the card 

reading device on which control 
cards are read. 

SYSLST — Required. Refers to the printer 
on which the directories are 
listed. 

SYSLOG -- Optional. Refers to the printer 
on which control statements are 
listed. 



CONTROL STATEMENTS 

Job Con trol_ Statements 

The following job control statements are 
used to set up the system for the execution 
of the DSERV program. 



// JOB DSERV 
// ASSGN 



// EXEC 



Required. 

Required for any sym- 
bolic address whose 
device assignment in 
main storage is to be 
changed. 
Required. 



Note: The OPTN control statement must not 
be included in the job control statements 
for the DSEBV program. 

Program Control St a t e m e n ts 

The following control statements are used 
to supply information to the DSERV program, 



// DSPLY CD 



// DSPLY MD 



// DSFLY CD, ED 

or 
// DSPLY EE,CD 

or 
// DSPLY ALL 

// END 



Required if the core- 
image directory is to 
be displayed. 

Required if the macro 
directory is to be 
displayed . 

Required if toth 
directories are to be 
displayed. 



Required. Must be the 
last program control 
statement. 



Any other job control statements need be 
issued only if the corresponding functions 
are to be requested. 



Note: Only one DSPLY control statement is 
used. 



PREPARATION OF THE SYSTEM 

The following steps must be taken to pre- 
pare the system for the execution of the 
DSERV program. 

1. If the TPS Basic Monitor program is not 
yet in main storage, follow the proce- 
dure described in the section The Tape- 
Residen t_Sy s tem . 

2. Place into the hopper of the device 
assigned to SYSRDR: 

a) the cards containing the job control 
statements, 

b) the cards containing the program 
control statements for the DSERV 
program. 

Press the Start key of the device. 

3. Install forms in the printer; press the 
Reset key and the Start key of the 
device. 

4. Press the Start key on the CPU console. 



DESCRIPTION OF OUTPUT 

The output from the DSERV program is a list 
of the entries contained in the directory 
(or directories) specified in the DSPLY 
ccntrol statement. 
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USING_TKE_CORE z IMAGE_SERVICE_PBOGR : aM 

The Core-Image Service program (CSERV) 
enables the user to check some or all of 
the programs or program phases contained in 
the core-image library of his system tape. 
It also enables him to extract (i.e., punch 
out) some or all of the contents of the 
library for such purposes as making correc- 
tions or creating back-up. 

The program is used to print, in hexade- 
cimal notation, one, several or all program 
phases from the library, and/or to punch 
the phases into TXT and END cards. It can 
also be used to print and/or punch the 
Tape-Resident Basic Monitor program, which 
is not contained in the program library. 

Output from the CSERV program may be 
used as input to the Core-Image Maintenance 
program or to the Load System Tape program. 

The CSERV program must be contained in 
the core-image library of the user's tape- 
resident system if it is to be used. 



I/O DEVICE ASSIGNMENTS 

The following symbolic device addresses are 
used in preparing and performing the execu- 
tion of the CSERV program: 

SYSRES — Required. Assigned at IPL time. 
Refers to the tape drive on which 
the system tape is mounted. 

SYSRDR — Required. Refers to the card 

reading device on which job con- 
trol statements and CSERV control 
statements are read. 

SYS000 — Required. Refers to the tape 
drive on which a work tape is 
mounted. 

SYSOPT -- Required if program phases are to 
be punched into cards. Refers to 
the card punching device on which 
the output is to be produced. 

SYSLST — Required if program phases are to 
be printed. Refers to the print- 
er on which the printed output is 
to be produced. 

SYSLOG -- Optional. Refers to the printer 
on which control statements, mes- 
sages, and information on the 
extracted phases may be printed. 



CONTROL STATEMENTS 



Job Control Statements 

The following job control statements are 
used to set up the system for the execution 
of the CSEEV program. 



// JOB 
// DATE 

// ASSGN 

// EXEC 



CSERV Required. 



Required if the execution 
of the CSERV program is 
the first job in a system 
run. 

Required for any symbolic 
address whose device 
assignment in main 
storage is to be changed. 

Required. 



Any other job control statements (such 
as FILES or LOG statements) need be issued 
only if the corresponding functions are 

required. 

Ihe job control statements are read on 
the device assigned to SYSRDR. 



Pj.Q.gorc Control Statements 

The following program control statements 
are used to supply information tc the CSERV 
program. 



// ESPLY phase-name 



// ESPLY ALL 



// DSPLY nnnnnn.ALL 



// DSPLY 

and 

// MONTR 



// PUNCH phase-name 



Required if the pro- 
gram phase whose 
name appears in the 
operand field is to 
be printed . 

Required if all pro- 
gram phases con- 
tained in the core- 
image library are to 
be printed. 

Required if all pro- 
gram phases whose 
names begin with a 
character combina- 
tion identical to 
that preceding the 
period in the 
operand field are to 
be printed. 

Required if the tape 
Easic Monitor pro- 
gram is to be 
printed. 

Required if the pro- 
gram phase whose 
name appears in the 
operand field is to 
be punched. 
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// PUNCH ALL 



// PUNCH nnnnnn.ALL 



// PUNCH 

and 

// MONTH 

// END 



Required if all pro- 
gram phases con- 
tained in the core- 
image library are to 
he punched. 

Required if all pro- 
gram phases whose 
names begin with a 
character combina- 
tion identical to 
that preceding the 
period in the 
operand field are to 
be printed. 

Required if the tape 
Basic Monitor pro- 
gram is to be 
punched. 



Required. Must be 
the last program 
control statement. 



As many DSPLY and PUNCH statements as 
desired may be submitted to the CSERV pro- 
gram in any order. 

The program control statements for the 
CSERV program are read on the device 
assigned to SYSRER. 



PREPARATION CF THE SYSTEM 

The operator must take the following steps 
to prepare the system for the execution of 
the CSERV program. 

1. If the system run has not yet been 
initiated, follow the procedure 
described in the section The_Tap_e- 
Resident System . 

2. Place into the hopper of SYSRDR: 

• the cards containing the job control 
statements 

• the cards containing the program 
control statements. 

3. Press the Start key of the device 
assigned to SYSRDR. 

4. If the printer is to be used as SYSLST 
and/or SYSLOG, prepare and start this 
device. 

5. If a card punching device has been 
assigned to SYSOPT, place blank cards 
in the hopper of the device and press 
the Start key. 



Mount a work tape on the drive assigned 
to SYS000. Press the Load-Rewind key 
and the Start key of this drive. 

Press the Start key on the CEU console 
(or the Load key if the execution of 
the CSERV program is the first jet in 
the system run) . 



PROGRAMMED HALTS 

A number of programmed halts may occur dur- 
ing the loading and execution of the TPS 
Core Image Service program. The halt-code 
displays and the associated restart proce- 
dures are described in the section Pro- 
grammed Halt Displays a nd R estart 
Procedures. 



MESSAGES 

A number of messages may be printed during 
execution of the CSERV program. They are 
printed on either SYSLCG or SYSLST (depend- 
ing on the kind of message) . 



DESCRIPTION OF OUTPUT 

The output from the CSERV program consists 
of: 

• printed output, and/or 

• output in cards. 

JElii]ted_ Output 

Each phase for which printing has teen 
requested by a DSPLY card is listed on the 
printer. The listing includes: 

• information from the header record 
for the phase (and any subphases) , 
and 

• a hexadecimal print-out of the phase 
(and any subphases) . 

Cut_put_in_ Cards 

If a card-punching device has been assigned 
to SYSOPT, the output requested by means of 
PUNCH statements comprises the following 
cards . 

a) For the Basic Monitor program: 

// MONTR 
ESC card 
TXT cards 
END card 
// END 
// LCAEC 
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b) For Library phases: 

// CATAL (used by the Core-Image Main- 
tenance program) 
PHASE card 
TXT cards 
END card 

TXT cards (for any sub-phase) 
END card 

c) At the end of the output file: 
// END 



All output cards except those for the 
Easic Monitor contain identifying informa- 
tion in columns 73 to 79. The identifica- 
tion consists of the first character and 
the last two characters of the phase name 
(or, if the name has less than three char- 
acters, the name and blank/s) , the sub- 
phase number (0 to 9) # and a serial number. 



The cards for the Basic Monitor have the 
letters MNTB in columns 73 to 76, and a 
serial number in columns 77 - 79. 
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DSING THE MACRO SERVICE PROGRAM 

The Macro Service program (MSERV) enables 
the user to check individual macro defini- 
tions or the complete contents of the macro 
library on his system tape. It also 
enables him to punch out some or all of the 
contents of the library for such purposes 
as making corrections or creating backup. 

The program is used to print one, sever- 
al, or all of the macro definitions from 
the library, the listing being in the same 
form (i.e. one card per line) as the ori- 
ginal cards, and/or to punch the macro 
definitions into cards. 

Output from the MSERV program may be 
used as input to the Macro Maintenance 
program. 



I/O DEVICE ASSIGNMENTS 

The following symbolic device addresses are 
used in preparing and performing the execu- 
tion of the MSERV program: 

SYSRES — Required.. Assigned at IPL time. 
Refers to the tape drive on which 
the system tape is mounted. 

SYSRDR — Required. Refers to the card 

reading device on which job con- 
trol statements and MSERV control 
statements are read. 

SYS000 — Required- Refers to the tape 
drive on which a work tape is 
mounted. 

SYSOPT — Required if macro definitions are 
to be punched into cards. Refers 
to the card punching device on 
which the output is to be 
produced. 

SYSLST — Required if macro definitions are 
to be printed. Refers to the 
printer on which the printed out- 
put is to be produced. 

SYSLOG — Optional. Refers to the printer 
on which control statements, mes- 
sages, and information on the 
extracted macro definitions may 
be printed. 



CONTBOL STATEMENTS 

Jo b C ontro l S tatements 

The following job control statements are 
used to set up the system for execution of 
the MSERV program. 



// JCE 



// EATE 



// ASSGN 



// EXEC 



KSERV Required. 



Required if the execution 
of the MSERV program is 
the first job in a system 
run. 

Required for any symbolic 
address whose device 
assignment in main 
storage is to be changed. 

Required. 



Any other job control statements (such 
as FILES or LOG statements) need be issuec 
only if the corresponding functions are 
required. 

The job control statements are read on 
the device assigned to SYSBEB. 



I!JL2H£il!_Control_Statements 

The following program control statements 
are used to supply information to the MSERV 
program. 

// ESPLY macro- Required if the macro 
name definition whose name 
appears in the operand 
field is to be printed. 



// ESPLY ALL 



// PUNCH 



macro- 
name 



// PUNCH ALL 



// ESPCH 



macro- 
name 



// DSFCH ALL 



// END 



Required if all macro 
definitions in the macro 
library are to be 
printed. 

Required if the macro 
definition whose name 
appears in the operand 
field is to be punched. 

Required if all macro 
definitions in the macro 
library are to be 
punched. 

Required if the macro 
definition whose name 
appears in the operand 
field is to be both 
printed and punched. 

Required if all macro 
definitions in the macro 
library are to be both 
printed and punched. 

Required. Must be the 
last program control 
statement. 



As many ESPLY, PUNCH and/or ESPCH state- 
ments as desired may be submitted to the 
MSERV program, in any order. 
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The program control statements for the 
MSERV program are read on the device 
assigned to SYSBBR. 



PREPARATION OF THE SYSTEM 

The operator must take the following steps 
to prepare the system for the execution of 
the KSERV program. 

1. If the system run has not already been 
initiated, follow the procedure 
described in the section The n T§pe- 
Resi dent S ys tem . 

2. Place into the hopper of SYSRDR: 

• the cards containing the job control 

statements 

• the cards containing the program con- 

trol statements. 

3. Press the Start key of the device 
assigned to SYSRDR. 

4. If the printer is to be used as SYSLST 
and/or SYSLOG, prepare and start this 
device. 

5. If a card punching device has been 
assigned to SYSOPT, place blank cards 
in the hopper of the device and press 
the Start key. 

6. Mount a work tape on the drive assigned 
to SYS000. Press the Load-Rewind key 
and the Start key of this drive. 

7. Press the Start key on the CPU console 

(or the Load key if execution of the 
MSERV program is the first job in the 
system run) . 



PROGRAMMED HALTS 

A number of programmed halts may occur dur- 
ing the loading and execution of the MSERV 
program. The halt-code displays and the 
associated restart procedures are described 
in the section Programmed Halt Displays and 
1 est art Pro cedures,. 



MESSAGES 

A number of messages may be printed during 
execution of the MSERV program. These mes- 
sages are printed on either SYSLOG or SYS- 
LST (depending on the kind of message) . 



DESCRIPTION OF OUTPUT 

The output from the MSERV program consists 
of: 



• printed output, and/or 



* output in cards. 



The output generated by the DSPLY state- 
ment is the same as that generated by the 
PUNCH statement except for the fact that 
DSPLY is used to produce a print file and 
PUNCH a card file. The output of DSPCH is 
both a card file and a print file. 



As the Macro Mainte 
gram converts the form 
conditional-assembly s 
definition into an int 
TPS Assembler at the t 
the system tape, it is 
reproduce exactly the 
of the original cards. 
MMAINT and the origina 
lest, and MSERV has to 
bers. However, the or 
meters and the seguenc 
same. As a result, it 
insert new model and c 
statements into the ca 
output from MSERV and 
macro definition back 
means of MMAINT. 



nance (MMAINT) pro- 
at of the model and 
tatements of a macro 
ernal format for the 
ime they are put onto 

not possible to 
same format as that 

The comments for 
1 card numbers are 

create new card num- 
iginal symbolic para- 
e symbols will be the 

is possible to 
on ditional- assembly 
rd deck produced as 
to put the revised 
into the library by 



The output of MSERV consists of 



CATAL 
MACRO 



prototype statement 



model and conditional-assembly 
statements 

MEND 

At the end of the output file there 
will be a // END card. 

Ihe cards will have an identification 
and a sequence number as follows: 



Columns 73 - 



75 macro identification con- 
sisting of the first char- 
acter and the last two 
characters of the macro 
name. 



Columns 76 ^ 79 sequence number. 

The first macro definition of each 
priority section to be punched will be pre- 
ceded by a PRIOR control statement refer- 
ring to that priority section. 
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I U IL DING ADDITIONA L SYSTEM TAPES FROM 
IBM-SUPPLIED AND USER-WRITTEN P ROGRAM S 

In addition to the initial system tape, 
which is built from IBM-supplied programs 
exclusively, the user may build other sys- 
tem tapes that are tailored to his require- 
ments. He builds these additional systems 
from his own object programs and from IBM- 
supplied programs. Additional system tapes 
are built by means of the Load System Tape 
program, which must be contained in punched 
cards and executed under control of the 
card-resident system. Each system tape, 
regardiess of whether it is built from IBM- 
supplied programs only or from a combina- 
tion of IEM-supplied and user-written pro- 
grams, must include the tape Basic Monitor 
program and a program library containing 
the tape Job Control program. 

The programs or program phases to be 
included in a tape-resident system (i.e., 
the input to the Load System program) can 
be either contained in punched cards or 
stored on magnetic tape in card-image for- 
mat. Program decks of IBM-supplied pro- 
grams that are to be included in the system 
are obtained from the tape supplied by IBM 
by means of the Distribution-Package Re- 
trieval program. The user's object pro- 
grams are obtained as punched output from 
one of the following: 

1. The TPS Report Program Generator. 

2. The TPS Assembler program (if object 
programs do not require linking and/or 
relocation) . 

3. The TPS Linkage Editor program (if 
linking and/or relocation of assembled 
object programs was required) . 

4. The TPS Core-Image Service program. 

The tape Basic Monitor program must be 
the first program on every system tape. 

The programs or program phases to be 
included in the program library of a system 
tape must be arranged as follows: 

1 . Job Control program. 

2. Other IBM-supplied and user-written 
programs in alphabetical order by pro- 
gram (phase) names. 



CONTROL STATEMENTS 

Job Control State ment s 

If a Job Control run is required, the fol- 
lowing job control statements must be 
issued to the card Job Control program to 



set up the system for the loading and 
execution of the Load System Tape program: 

// JOB LDSYS 

// EXEC 

The use of any other job control cards 
depends on the Job Control functions 
required (e.g., the listing of control 
statements or I/O device assignments) . 

Note: The CPTN control statement must not 
be included in the job control statements 
for the LDSYS program. 

Program Control Statements 

The following control statements are 
required to supply information to the Load 
System Tape program: 

// MONTR 

// END 

// LCADC 

// END 

Ihe cards containing these control 
statements are normally supplied by the 
programmer. The operator must ensure that 
they are present and that they are located 
in the proper place. If the input to the 
Load System Tape program is on tape, the 
LCADC control statement and the second ENE 
control statement must also be stored on 
the input tape, in card-image format (see 
Figure 14) . 



I/O DEVICE ASSIGNMENTS 

The following symbolic I/O device addresses 
are used in preparing and performing the 
execution of the LDSYS program: 

SYSRDR — Required. Refers to the card 
reading device for reading: 

1. the Job Control program (if 
required) , 

2. job control statements (if 
any) , 

3. the Load System Tape program, 

4. the MONTR control statement, 

5. any ASSGN and/or CONFG control 
statements used to insert or 
change standard assignments 
and/or change the storage capa- 
city specification in the tape 
Basic Monitor program, and 
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6. an END control statement. 

SYSIPT — Required. Refers to the card 

reading device or tape drive used 
for reading: 

1 . the tape Basic Monitor program, 

2. the LOADC control statement, 

3. the input programs and/cr pro- 
gram phases, and 

4. an END control statement. 

SYSOPT — Required. Refers to the tape 

drive on which the reel to accom- 
modate the tape-resident system 
is mounted. 

SYS000 — Required. Refers to the tape 
drive on which a work tape is 
mounted. 

Note: SYSRDR and SYSIPT may be assigned 
the same card reading device. 



PREPARATION OF THE SYSTEM 

The following steps must be taken by the 
operator to execute the Load System Tape 
program under control of the card-resident 
system. 



1. If the system run has not yet been 
initiated, follow the procedure 
described in the section The_Card- 
Resident_ System . 

2. If a Job Control run is required, place 
the Job Control program deck and the 
job control cards (between phase 02 and 
phase 03 of the Job Control program 
deck) into the hopper of the device 
assigned to SYSRDR. 

3. Place the Load System Tape program 
deck, followed by the MONTR control 
card, into the hopper of the device 
assigned to SYSRDR (behind the EXEC 
control card) . 

4. If SYSIPT has been assigned the same 
card reading device as SYSRDR, 

• place the tape Basic Monitor deck 
into the hopper of the device, 
behind the MONTR control card; 

• place any ASSGN and/or CONFG cards 
behind the tape Basic Monitor deck; 

• place an END control card behind 
the last card in the hopper (ASSGN 
or CONFG card or, if no such cards 



are used, last card of the tape 
Basic Monitor deck) ; 



• place the input phases, preceded by 
the LOADC control card and followed 
by another END control card, into 
the hopper of the device, behind 
the first END card. 

If SYSIFT has been assigned a card 
reading device other than that assigned 
to SYSRDR, 

• place into the hopper of SYSBDR, 
behind the KCNTR control card, any 
ASSGN and/or CONFG cards used for 
modifying the tape Easic Monitor 
program, followed by an END control 
card ; 

• place into the hopper of SYSIPT, in 
the order indicated, the tape Basic 
Monitor deck, the LCAEC control 
card, the input phases, and an END 
control card. 

If SYSIPT has been assigned a tape 
drive, 

• place into the hopper of SYSRDR, 
behind the KCNTR control card, any 
ASSGN and/or CONFG cards used for 
modifying the tape Basic Monitor 
program, followed by an END card; 

• mount on the tape drive assigned to 
SYSIFT the tape reel on which the 
tape Basic Monitor program, the 
LOADC control statement, the input 
phases, and the BSD control state- 
ment are stored in card-image for- 
mat; press the Load-Rewind key and 
the Start key of the drive. 

5. Mount on the tape drive assigned to 
SYSOPT the reel of tape which is to 
accommodate the tape-resident system; 
press the Load-Rewind key and the Start 
key of the drive. 

6 . Mount a work tape on the tape drive 
assigned to SYS000; press the Load- 
Rewind key and the Start key of the 

drive. 

7. Press the Start keys of all required 
I/O devices that are not yet ready. 

8. Press the Start key on the CPU console. 

The Job Control program (if used) is now 
loaded into main storage, and the job con- 
trol statements (if any) are processed to 
set up the system for the execution of the 
Load System Tape program. Then, the Load 
System Tape program is loaded into main 
storage and executed. 



Creation and Maintenance of System Tapes 69 



Figure 16 shows the arrangement of input 
for the building of a tape-resident system. 



ERBOB HALTS 

A number of programmed halts may occur dur- 
ing the loading and execution of the Load 
System Tape program. The halt codes dis- 
played and the appropriate restart proce- 
dures are described in the section 
Pr ogr ammed -Halt Displays and Restart 
Procedures. 



DESCRIPTION CF CDTPOT 

The output of the Load System Tape program 
is an operable tape-resident system on the 
tape mounted on the drive assigned to 
SYSCPT. 



N ote : The system tape should be 
file-protected. 



//END 



( ASSGN and/or CONFG | 
Statements 



// MONTR 



/co7 



LDSYS Program 



£ 



d Job Control Program 
Phase 03 



Job Control Statements 



Card Job Control Program 
PhoMs 00, 01,02 



SYSRDR 




SYSIPT 



Note: SYSRDR and SYSIPT may be assigned the same card reading device. In that case, the cards read on SYSIPT must be placed 
in the deck read on SYSRDR as indicated by the broken lines. 

•Figure 16. Arrangement of Input for the Execution of the LDS1S Program 
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SAMPLE PROGRAMS 



In addition to the Basic Assembler sample 
program, which is described in the SRL pub- 
lication IBM Sys t em/360 Model ..2C. € ^Cg.rd_Pro: 
q ram ming Support, Basic A sse mbler (Tape 

Versions) Operating Procedures, Form C24- 

9011, six sample programs for the Tape Pro- 
gramming System are provided in card-image 
format on the tape supplied by IBM. The 
sample decks are obtained by means of the 
Distribution-Package Retrieval Program. 

In the following descriptions, in cases 
where a sample program consists of several 
parts, it is assumed that the sample pro- 
gram is executed in one continuous run. 

MMPiiE_PROGRAM_I 

The first sample program is designed to 
demonstrate: 



the use of the Assem 
the use of the macro 
the execution of obj 
control of the card- 
the execution of obj 
on tape in card-imag 
trol of the tape-res 
(execute-loader func 
the use of the Core- 
program, 

the execution of obj 
tained in the progra 
tape-resident system 



bier program, 

library, 
ect programs under 
resident system, 
ect programs stored 
e format under con- 
ident system 
tion) , 
Image Maintenance 

ect programs con- 
m library of the 



DESCRIPTION OF THE SAMPLE DECK 

The sample-program cards are identified by 
the letter in column 73. 

The deck consists of nine card groups, 
which are identified by different digits in 
card columns 74-75 (see list below) . 



Card column 76 contains a 2 (identifi- 
cation for TPS) i 

Card columns 77-79 contain consecutive 
card numbers, which begin with 001 for each 
card group. Sample deck 1 consists of the 
following card groups: 

Columns 

74 75 Description 

9 Job control cards for execution of 
the Assembler program with output 
in punched cards. 

9 1 Source program in Assembler 
language. 

9 2 Job control cards for execution of 
the assembled sample program (in 
cards) under control of the card- 
resident system. 

9 3 Job control cards for execution of 
the Assembler program with output 
on tape. 

9 4 Job control cards for execution of 
the assembled sample program (on 
tape in card-image format) under 
control of the tape-resident 
system. 

9 5 Job control cards and program con- 
trol cards for execution of the 
CHAINT program. 

9 6 Job control cards for execution of 
the assembled sample program (con- 
tained in the program library) 
under control of the tape-resident 
system. 

9 7 Job control cards for execution of 
the Initialize-Tape program. 

9 8 Program control cards for the 
Initialize-Tape program. 

Figures 17 through 2U show the card 
groups of Sample Program 1. 
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Figure 17. Job Control Statements for Assembly with Output in Cards 
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Figure 18. Source Statements, Part 1 of 2 
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Figure 20. Job Control Statements for Assembly with Output on Tape 
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•Figure 22. Job Control and Program Control Statements for Core-Image Maintenance 
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Figure 23. Job Control Statements for Execution from Core- Image Library 
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Figure 24. Job Control and Program Control Statements for Initialize-Tape Program 



OPERATING PROCEDURES 

The sample deck supplied by IBM is designed 
for Model 20 systems with a storage capaci- 
ty of 8 192 bytes and the following I/O 
devices: 



Assembly with Output in Cards 

The following steps must be taken to 
assemble the source program and obtain the 
executable object program in punched cards- 



• an IBM 2501 Card Reader, 



• an IBM 2560 MFCM, 

• an IBM 1403 Printer, 

• an IEM 2415 Magnetic Tape Unit, Model 2, 
3, 5, or 6 (9- track drives with unit 
numbers 80, 81 , 82, 83) . 

If the user's Model 20 system has a dif- 
ferent I/O configuration or different tape 
unit numbers, the ASSGN cards in the sets 
of job control cards and/or the REP cards 
supplied with the control programs (card 
Basic Monitor and tape IPL, respectively) 
must be changed accordingly. 



Mount the system tape (containing the 
TPS Assembler program and the macro 
library with the Basic Monitor and IOCS 
macro definitions) on the tape drive 
assigned to SYSRES (see ASSGN card in 
group 090). Press the Load-Rewind key 
and the Start key of the device. 

Mount work tapes on the tape drives 
assigned to SYS00O and SYS001 (s.ee 
ASSGN cards in group 090) . Press the 
Load-Rewind keys and Start keys of the 
drives. 

Remove the ASSGN cards for SYSRES and 
SYSRDR from card group C90 and place 
them in the IPL deck, in front of the 
REP cards (if used) and the end-of-file 
card. Place this card deck into the 
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hopper of the loading unit (2501 in the 
example) . 

4. Place card group 09C (job control 
cards) into the hopper of SYSRDR (2501 
in the example) . 

5. Place card group 091 (sample source 
program) into the hopper of SYSIPT 

(2501 in the example). Press the Start 
key of the device . 

6. Place blank cards into the hopper of 
SYSOPT (2560 secondary feea in the 
example) and press the Start key of the 
device. 

7. Install forms in the printer (1403 in 
the example) and press the Reset key 
and the Start key of the device. 

8. Set the Register-Data/Address switches 
on the CPD console to an even core 
storage address between hexadecimal 
009C and the end-of-storage address 
minus hexadecimal 0052. 

9. Set the Mode switch on the CPU console 
to PROCESS. 

10. Press the Load key on the CPU console. 

A sample of the Assembler listing 
obtained on the printer is shown in Figure 
25. 

The object program, contained in punched 
cards, is obtained on SYSOPT. The system 
then halts and code 01D0 is displayed. 



Execution Under Control o f th e 
Card- Resident _ System 

The execution of the sample program 
requires a tape on the drive assigned to 
SYS001 (see ASSGN card in group 092) . This 
tape must contain a volume label with the 
volume serial number C00001. 

The following steps must be taken to 
write this label on tape by means of the 
Initialize-Tape Utility program. 

1. The system tape (containing the 
Initialize-Tape Utility program) 
remains on the tape drive assigned to 
SYSRES from the previous run. 

2. The tape on the drive assigned to SYS- 
000 (see ASSGN card in group 097) is 
already positioned at the load point 
from the previous run. 

3. Place the tape IPL deck (containing 
ASSGN cards for SYSRES and SYSRDR from 
the previous run) into the hopper of 
the loading unit (2501 in the example) . 



4. Place group 097 (job control state- 
ments) and card group 098 (program con- 
trol statements) into the hopper of 
SYSRDR (2501 in the example), and press 
the Start key of the device. 

5. Set the Register-Data/Address switches 
on the CPU console to an even main 
storage address between hexadecimal 
009C and the end-of-storage address 
minus hexadecimal 0052. 

6. Set the Mode switch on the CPU console 
to PROCESS. 

7. Press the Load key on the CPU console. 

After the volume label has been written 
onto tape, the system halts and code 01D0 
is displayed. 

The following steps must be taken to 
execute the object program obtained as card 
output from the Assembler under control of 
the card-resident system. 

1. Place the card IPL deck into the hopper 
of the loading unit (2501 in the 
example) . 

2. Prepare the appropriate ASSGN card for 
SYSRDR and place it behind the IPL 
deck. 

3. Place the card Basic Monitor deck into 
the hopper of the loading unit. 

4. Place the following cards into the hop- 
per of SYSRER: 

• phases 00, 01 and 02 of the Job Con- 
trol program deck, 

• card group 092 (job control cards) , 
and 

• phase 03 of the Job Control program. 

5. Place the sample object deck into the 
hopper of SYSRDR. 

6. Press the Start key (s) of the card 
reading device (s) used. 

7. Press the Reset key and the Start key 
of the printer. 

8. The initialized tape is mounted on the 
tape drive assigned to SYS001 (see 
ASSGN card in group 092) and positioned 
at the load point, from the previous 
run. 

9. Set the Register-Data/Address switches 
on the CPU console to an even main 
storage address between hexadecimal 
009C and the end-of-storage address 
minus hexadecimal 0052. 
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10. Set the Mode switch on the CPU console 
to PROCESS. 

11. Press the Load key on the CPD console. 

A list of job control statements is 
obtained on the printer. 

The sample program creates 100 data 
records and writes them onto the tape. It 
then reads the records from the tape and 
lists them on the printer. 



When the execution is completed^ 
system halts and the code 0B20 is 

displayed. 



the 



If the next job is to be executed, the 
initialized tape, which is mounted on the 
drive assigned to SYS001, must be unloaded 
and kept for later use. 



A sse mbly with.Output. on Ta pe and^gxecution 
by_.Mea.ns of Execute-Loader Function 

The following steps must be taken to 
assemble the sample source program with 
output on tape and to execute the program 
from this tape (two stacked jobs) . 

1. The system tape (containing the TPS 
Assembler program and the macro library 
with Basic Monitor and IOCS macro 
definitions) remains on the tape drive 
assigned to SYSRES from the previous 
run. 

2. Mount an appropriate output tape on the 
drive assigned to SYSOPT (see ASSGN 
card in group 093) . Press the Load- 
Rewind key and the Start key of the 
drive. 

3. Mount work tapes on the drives assigned 
to SYS000 and SYS001 (see ASSGN cards 
in group 093.) Press the Load-Rewind 
keys and the Start keys of the drives. 

4. Place the tape IPL deck (containing 
ASSGN cards for SYSRES and SYSRDR from 
the previous runs) into the hopper of 
the loading unit (2501 in the example). 

5. Place card group 093 (job control cards 
for assembly) into the hopper of SYSRDR 

(2501 in the example) . 

6. Place card group 091 (sample source 
program) into the hopper of SYSIPT 

(2501 in the example) . 

7. Place card group 094 (job control cards 
for execution) into the hopper of 
SYSRDR. 

8. Press the Start key (s) of the card 
reading device (s) used. 



9. Press the Reset key and the Start key 
of the printer. 

10. Set the Register-Data/Address switches 
on the CPU console to an even main 
storage address between hexadecimal 
009C and the end-of-storage address 
minus hexadecimal 0052. 

11. Set the Eode switch on the CPU console 
to PROCESS. 

12. Press the Load key on the CPU console. 

The Assembler listing (Figure 25) is 
obtained on the printer. The object pro- 
gram is written onto the tape mounted on 
SYSOPT. 

When the assembly has been completed, 
the Job Control program is called. The Job 
Control program reads the job control 
statements for execution and loads the 
object program into storage from the tape. 

Execution begins with label checking on 
SYS001, and since the Assembler work tape 
is still mounted on this drive, a system 
halt occurs and the code 0E0A is displayed. 

To resume operation, take the following 
steps: 

1. Remove the tape reel from SYS001. 

2. Mount the initialized tape with volume 
serial number 000001 on the tape drive, 
and press the Load-Rewind key and the 
Start key of the drive. 

3. Enter FF into location 00CE. 

4. Press the Start key on the CPU console. 

Label checking is now performed on the 
tape, and the sample program is executed. 
The list of records is produced on the 
printer. The system halts and code 01D0 is 
displayed. 

If the next job is to be executed imme- 
diately, the initialized tape (on the drive 
assigned to SYS001) must be unloaded and 
kept for later use. 

Assembly w ith Ou tput on Tape x , Core-Image 
Maintenance, m and Executign_from the Pr ogram 
Library 

The following steps must be taken to 
assemble the sample source program with 
output on tape, include the object program 
in the program library, load the program 
from the library and execute it. 

1 . The system tape (containing the TPS 

Assembler program, the CMAINT program, 
and the macro definitions) remains on 
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the tape drive assigned to SYSRES from 
the previous run. 

2. Mount an output tape {for the assembly) 
on the tape drive assigned to SYSOPT 

(see ASSGN card group 093). Press the 
Load-Rewind key and the Start key of 
the drive. 

3. Mount work tapes on the drives assigned 
to SYS000 and SYS001 (see ASSGN cards 
in group 093) . Press the Load-Rewind 
keys and the Start keys of the drives. 

4. Place the tape IPL deck (containing 
ASSGN cards for SYSRES and SYSRDR from 
previous runs} into the hopper of the 
loading unit (250 1 in the example). 

5. Place card group 093 (job control cards 
for assembly) into the hopper of SYSRDR 
(2501 in the example) . 

6. Place card group 091 (sample source 
program) into the hopper of SYSIPT 

(2501 in the example) . 

7. Place card group 095 (control cards for 
CHAINT) into the hopper of SYSRDR. 

8. Press the Start key (s) of the card 
device (s) used. 

9. Press the Reset key and the Start key 
of the printer. 

10. Set the Register-Data/Address switches 
on the CPU console to an even main 
storage address between hexadecimal 
009C and the end-of -storage address 
minus hexadecimal 0052. 

11. Set the Mode switch on the CPU console 
to PROCESS. 

12. Press the Load key on the CPU console. 

The Assembler program is executed first. 
A listing (Figure 25) is obtained on the 
printer, and the object program is produced 
on the tape drive assigned to SYSOPT in 
card group 093. The Job Control program is 
called into storage. It reads the job con- 
trol cards for CMAINT and loads the CMAINT 
program. The CMAINT program is executed, 
and the updated system tape (containing the 
sample object program) is produced on the 
drive assigned to SYSOPT in card group 095. 
The system halts and code 01D0 is 
displayed . 



lo prepare the execution of the sample 
program contained in the program library of 
the new system tape, perform the following 
steps: 



1 . Remove the updated system tape from 
SYSOPT (see ASSGN card in group 095) 
and remove the file-protection ring. 
(The read-write head must be raised in 
order to change the status of the file- 
protection) . Re-mount the reel on the 
drive, press the Load-Rewind key and 
the Start key of the drive. 



2. Remove the tape reel from SYS001 (see 
ASSGN card in group 096) and mount the 
initialized tape with volume serial 
number 000001 on the drive. Press the 
Load-Rewind key and the Start key of 
the device. 

3. Remove the ASSGN cards for SYSRES and 
SYSRDR from card group C96 and place 
them in the IPL deck, in front of the 
REP cards (if used) and the end-of-file 
card. Place this deck into the hopper 
of the loading unit (2501 in the 
example) . 

4. Place card group 096 (control cards for 
execution) into the hopper of SYSRDR 
(2501 in the example). 

5. Press the Start key of the card reading 
device. 

6. Set the Register-Data/Address switches 
on the CPU console to an even main 
storage address between hexadecimal 
009C and the end-of-storage address 
minus hexadecimal 0052. 

7. Set the Mode switch on the CPU console 
to PROCESS. 

8. Press the Load key on the CPU console. 

The IPL procedure is performed, and the 
drive on which the updated system tape is 
mounted is assigned to SYSRES. The sample 
object program is loaded into storage from 
the program library and is then executed. 
The output is obtained on the printer. 

After execution of the sample program, 
the system halts and code 01D0 is displayed 
tc indicate the completion of Sample Pro- 
gram 1 . 
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SAMPIF PRUGR. FUR MODEL 20 TAPE ASSFM8LFK 



12/31/67 PAGE 002 



I'ltATN IMJKn CURE APni AOOJ STMT 



SnutCE STATEMENT 



TPS AS V/N 2/0 



0003 r<FPRO FU INCLUDE NEXT CARO I N TLl UtJJECI DECK FOR CMA1NT JOB 

PHASE SAMPLE, A, 2000 

sTAKT 2000 FIRST LOC. USED BY PRGOH. IS 2000 

SAMPLE PKUoRAM WHICH CREATES RECORDS CONTAINING CONSECUTIVE NUMBERS 
FROM 1 TO 100. RECORDS ARE WRITTEN ONTO TAPE. 
TH f TAPE IS REAU AND PKINTEU 
THE PKdiiKAM USES 3 JATA FILES 
1. FILE TAPEOUT, A TAPE OUTPUT FILE 
?. FILE TAPEIN, A TAPE INPUT FILE 
3. FILE PRINTER, A PRINTER FILE 
THESE FILES ARE DFFINFD IN THE FOLLOWING 



000* 
0005 
0006 

000 7 
0003 
0009 
0010 
O011 
Oul2 

001 > 
001* 
001b 
0016 

0017 * 

0018 TAPEOUT 
0019 
0020* 
0021** 

0022** MOO 20 TPS IOCS VERSION 02 MUO-LEVEL 00 
0023** 



TAPFiiUT IS A BLOCKED TAPE OUTPUT FILE. 



U912o03 
091200* 
0*12005 
OV 12006 
0912007 
0912008 
0912009 
0912010 
U912011 
0912012 
0912013 
0912014 
091201% 
RECUkuSIZE IS 80. BLUCKSIZE IS 091201b 



800. THE REEL FUR THE FILE IS MuUNTEO ON SVS001. 



OTFMT BLKSIZF*800,DFVAOOR-SYS001,FlLAbL>STO,IOARtAl-AREA, 
RECF0RM«FIXBLK,TYPEFLE-OUTPUT,WURKA<YES,RECSIZE'80 

DTFMM 



0912017 

091201a 

XU912019 
0912020 
0TFNT003 
0TFMMUO1 
0TFMM0O2 
0TFMM003 



002'.** THIS MACRO PERFORMS THE 0IAGN. ANO CREATES THE OTFBLK FOR ALL TPFILES OTFMT005 



7,10 




U7i)0 




07no 


07DO 


"70? 


0707 


70* 


00 JO 


"706 


00*0 


•1708 


OOOE 


07DA 


07E2 


07DC 


10 


7')D 


80 


U70E 


0000 


07F0 


0000 


7E2 


03 


17F3 


80 


ri7F* 


0100 


17E6 


0320 


37C8 


01 


•)7E9 


00 


)7EA 


12B0 


07EC 


0320 


•)7Ft 


OOOOOOOC 


7F2 


0000 


3 7F* 


E3C107C5D6E*E3 


07FC 


0000 


07F* 




07FE 




032C 




Od2t 


*tfFO 


082E 


700 


0930 


0201 F08C EOOO 


0836 


*AEO F110 


083A 


*0E0 F0B6 



002 5* 

0026* 

0027*TAPEOUT 

0028* 

00?9*ICCB001 

0030* 

0031* 

003?* 

0033* 

0034* 

0035* 

0036* 



DS 



OH 



USING *,15 



DC 



YITAPEOUTI 

X>0707» REW OPTION COMMAND BYTES IREWINO) 

H'0« CCB INT. LINK 

B'OOOOOOOOOIOOOOOO' CCB COMMUNICATION INFO 

YU*I CCB LOoICAL UNIT DISPLACEMENT 

YIIC2W001) AUORESS OF SET MOOE CCH 

B'OOOIOOOO* FILE STATUS 

BMOOOOOOO' FILE CHARACT. 

YIO) NOT USED 

Y(OJ LUG UNIT DISP. FOR ALTTAPE 



0037** DEFINE SET MODE CCW. COMMAND BYTE IS INSERTED AT OBJ. TIME FROM PUB 



083E 
08*2 
08*6 
08*A 
0850 
085* 
0858 
085C 
0858 
085E 
0862 
0866 
086A 
096E 
0870 
0872 
087* 
087A 
0880 
388* 
0888 
088A 
08BE 
0892 
099* 
0896 
089A 
089C 
099E 
08A0 
08A2 
08A6 
08AA 
08AF 
0882 
08B6 
08BA 
086f 
08C2 
08C6 
08CA 
08CE 
0802 
OHD* 
0806 
08DB 
080A 

•>«oc 

0801 
08€0 

n«r ■> 

D8F* 
''8F6 



*8E0 F118 
91*0 F007 
*7b0 F072 
D201 F01C 
9101 F006 
*710 FOBA 



OflEO 
0886 



08E8 
0707 
08*? 
F112 07EC 
0706 
088A 



0O38*ICZWO01 DC 

003,9* DC 

00*0* OC 

00*1*ICNT001 OC 

00*2*ICCN001 OC 

00*3* OC 

00*** OC 

00*5* OC 

00*6*IHCT001 DC 

00* 7* DC 

00*8* OC 

00*9* DC 

0050*IN1 EOU 

0051* DS 

0052* US 

0053*TAPEOUTP DC 

005** OC 

0000 0055* MVC 

0056* AH 

0057* STH 

0058*TAPEOUT DTFND 
005*»* 



XL1»3» COMMAND! BYTE 'NOP 1 
XL1»80' FLAG BYTE I CHAIN BIT ONI 
H'256* CONSTANT, REPLACING UNUSED ADDR OF I/OAREA 
H'800* CONSTANT, REPLACING UNUSED LENGTHCOUNT 
XLl'l* COMMANO CODE 'WRITE' 
XLl'O' FLAGS 

Y(AREA) START ADORESS OF I/U AREA 
YI800) LENGTH COUNT 
PL*'0« PACKFO BLOCK COUNT 
Y(0l NOT USED 
CLT'TAPEOUT 1 FILENAME 
Y(OI SPtCIFIES FIRST DTFMT BLOCK 
*-10 

CL*6 ARFA TO SAVE LABEL INFO 
OH 

X'*8F0' LH 15, ADDR OF DTF BLOCK 
Y(TAPfcOUT) ENTRY FOR PUT 

IMOV001(2),0ll*l INSERT ADDR OF WURKAREA 
1*,IC02001 CALCULATE ANO 
1*,IRET001«2 SAVE RETURN ADDR 

, UUu,,,SYS001,,,STU, ARE A,,,, FORWARD, FIXBLK, 80, 
YES, 



0TFMT3D9 
0TFMT390 
DTFMT391 
0TFM1396 
DTFMT*00 
UTFMT*02 
0IFMT*12 
DTFMT*13 
DTFMT*16 
0TFMT*2* 
DTFMT428 
0TFHT**1 
DTFMT**2 
DTFMT**3 
OTFMT*** 
0TFMT*5U 
DTFMT*52 
0TFMT*63 
DTFMT*6* 
DTFMT*69 
DTFMT*75 
DTFMT*77 
0TFMI*79 
0TFM1*83 
DTFMT*8S 
DTFMT*90 
0TFMT*91 
DTFMT*92 
DTFMT518 
0TFMT519 
0TFMT521 
0TFMT522 
0TFMT525 
VES,OUTPU&DTFMTS*0 
DTFMTS*0 



0060** THIS MACRO HANDLES TAPE OUTPUT FILES, FIX LENGTH BLOCKED, H/O.WORKA 



D2*F EOOO 
*AEO Fll* 
*0E0 F118 
*9E0 F116 
*770 FOB* 
*0E0 
0E06 
070* 

FA30 F01E 
0201 Ft 18 
*700 FOEE 
*7F0 OOOO 
083F. 

*8E0 FOBS 
9*FE F006 
*8F0 
0700 

9*FF FOOC 
92F0 
08C3 
*8F0 
07D0 

*0E0 FOFB 
*8t0 Fllfl 
*BEO F01A 
*780 FOF? 
*0E0 F01C 
92F0 F0B1 
*7F0 F09E 
9200 F0B1 
*700 FOFA 
*7F0 FOB* 
9*00 FOF 3 
*8f0 FOFB 
*7F0 
1160 
*8F0 
07D0 
*7F0 
0F6C 

000? 
0320 
0050 
15 DO 



0000 0000 
08E* 
j8Ea 
08E6 
088* 



F11A 07EF 

F01A 08E8 

08uE 

0000 



EOU 
EOU 
MVC 



BNfc 



MVC 



08C8 
08E8 
07f A 
08C2 
07EC 
0881 
086E 
0881 
OflCA 
0B8* 
08C3 
08C8 



0061*IENT001 

0062* 

0063* 

08E2 006** 
0065* 
0066* 

0067*IMVE001 
0068*IMOV001 

0000 0069* 
0070* 
0071* 

007'*IBFT001 
0073* 

007**IREA001 
0075* 
0076* 

OSEA 0077* 

07EA 0078* 

0079*1 SWJ001 BC 

0080*IRET001 B 

0081*IAOR001 OC 

0082*IEOV001 LH 

0083* NI 

008**TAPE0UTF OC 

0085* DC 

0086* NI 

0087*TAPFOUTC OC 

0088* DC 

0089*TAPEOUTT DC 

0090* OC 

0091* 

0092* 

0093* 

009** 

0095* 

0096* 

0097* 

0098*IRES001 

0099*1 1 SWOOl 

0100*IRTN001 

0101*ICSE001 

0102* 

0103* 

010** DC 

0105*TAPE0UT0 DC 

0106* DC 

0107* OC 

0108* OC 

0109*ISVF001 

0110*IC02001 

0111*IBLK001 

0112*IREC001 

0113*IEOB001 



STH 



MVI 



DC 



DC 



1*,IRPT001 GET RECOROPOINTER 

ICCB001*3,X'*0» WAIT FOR 

*-* I/O COMPLETION 

ICCW001**I2),I»LK001 INITIALIZE BLOCKLENGTHCOUNT 

ICCBU01*2,X'01' TEST IF UNIT EXCEPTION 

IEOV001 YES 

* 

*♦* AOORESS OF WORKAREA 

0180,1*1,0101 MOVE RECORD FROM WORKA TO I/OAREA 

1*,IREC001 UPDATE RECOROPOINTER 

1*,IRPT001 

1*,1E0B001 ENO OF BLOCK TEST 

IRET001 IF NONRETURN IN-LINE 

X»*DEO' ELSE WRITE BLOCK 

YIIPIOCSI BAS 1*,IPI0CS 

YUCCbOOll 

IBCT001.IP01001 INCREASE 6L0CKC0UNT 

IRPT001,ICCW001*2 INITIALIZE RECOROPOINTER 

0,IRES001 SWITCH FOR TRUNC RTN. 

EXIT IN-LINE 

YCIENT001I DEFflNE RETURN ADDR FOR EOV CONDITION 

1*,IADR001 GET RETURNAOORtSS FOR EOV CONDITION 

ICCB001*2,X«FE I CLEAR UNIT EXCEPTION BIT 

X'*8F0' LH 15 f FILENAHE .LOAD BASEREG. 

Y(TAPEOUT) ENTRY POINT FOR FEOV 

121151, X'EF' SET EOF/EOV SWITCH IN DTF BLOCK TO EOV 

X'92F0" MVI IISW+l.X'FO' ENTRY POINT FOR CLOSE 

YUISW00U1I SET SWITCH TO EXIT TO GEN. CLOSE RTN. 

X^BFO* ENTRY PUINT FOR TRUNC 

YITAPEOUTI LH 15, FILENAME .LOAD BASEkEG. 

1*,1RTN001*2 SAVE RETURN ADDRESS 

1*,IRPT001 CALCULATE 

l*,ICCW001+2 CURRENT BLOCKLENGTH 

1 I SWOOl I/O AREA IS EMPTY 

1*,ICCW001** INSERT CURRENT BLKLENGTH INTO COUNT 

ISWJ001*1,X»F0« SET RETURN SWITCH 

IREA001 WRITE 

ISWJ001»1,X'00> RESET SWITCH TO NOP 

O.ICSE001 EXIT SWITCH FOR FEOV AND CLOSE ENTRY 

1RET001 EXIT FOR TRUNC ENTRY 

USWOOl + 1,0 RESET FEOV/CLOSE EXIT SWITCH 

1*,IRTN001*2 GET RETURN ADORESS 

X'*7F0« BC 15,1TACL0SE 

YIITACLOSEI EXIT FOR FEOV/CLOSE TO GEN. CLOSE RTN. 

K"»UFU' ENTRY POINT FOR OPEN 

YITAPEOUTI LH 15, FILENAME ,LOAO BASEREG. 

X'*7F0' BRANCH TO 

YIITAOPENI GENERAL TAPE OPEN ROUTINE 

H 

H»2' 

H»800» 

H'flO' RECORDSIZE 

YIAREA+800) 



DTFNU001 
0TFND002 
DTFN0003 
DTFNDOO* 
DTFND005 
0TFNU006 
0TFN0007 
UTFND008 
OTFN0011 
0TFND012 
OTFN0037 
0TFND038 
DTFND039 
0TFNU040 
DTFNDOM 
DTFN0042 
DIFNU0*3 
DTFN0045 
DTFN0047 
0TFN0048 
0TFN0049 
DIFND050 
DTFND051 
DTFN0052 
DTFN0053 
0TFND05* 
0TFND055 
0TFN0056 
DTFND057 
0TFND05B 
DTFNDC59 
0TFND060 
0TFND061 
OTFND062 
DTFN0063 
0TFND06* 
OTFN0065 
DTFN0066 
DTFN0067 
DTFND068 
DTFND069 
DTFND070 
DTFND071 
DTFND072 
DTFN0073 
OTFN007* 
DTFND075 
0TFN0076 
OTFNU077 
DTFND078 
DTFND079 
DTFN0080 
UTFN0061 
DTFND08S 



002 
002 
00* 
002 
002 
002 
002 
002 
002 
002 

002 
002 
002 
002 
002 
002 
002 
002 
002 
002 
002 
002 



003 
003 
003 
003 
003 



003 
003 
003 
003 
003 
003 



003 
003 
00* 
00* 
00* 
00* 
00* 
00* 

oo* 

00* 
00* 
00* 
00* 
00* 
00* 
00* 
00* 
00* 
00* 
005 

oos 
oos 

004 

oos 

005 
OOS 

oos 
oos 
oos 
oos 
oos 
oos 
oos 
oos 
oos 

006 
006 
006 
006 
006 

007 
007 
007 
007 



Figure 25. Sample of the Assembler Listing 
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SAKPLE PROGRAM 2 



DESCRIPTION OF THE SAKPLE DECK 



The second sample program is designed to 
demonstrate the use of the TPS Report Pro- 
gram Generator. 



In this sample program, a commission 
report is to be prepared from invoice sum- 
mary cards (Figure 26) . The cards are in 
sequence by salesman number. The commis- 
sion amount is calculated on the invoice 
amount. The percentage of commission 
depends on the invoice amount: 

10% commission for invoice amounts up to 
$10,000. 

12% commission for invoice amounts above 
$10,000. 

The commission is calculated for each 
card read. The result is printed, together 
with other data from the card. The total 
commission amount for each salesman is 
accumulated and printed. The total amount 
of commission is accumulated and printed at 
the end of the report. 



Sample deck 2 consists of three card 
groups, with the following identifications: 



Columns 
73 74 75 



description 



Job control cards for compile- 
and-execute function and output 
of object program in cards. 

RFG control card and source pro- 
gram in RPG language (identified 
by the letters SACO in cols. 
76-79) . 



B 



1 



Data cards 



In addition, card groups R90 and R91 
contain a 2 in column 76 (identification 
for TPS) and consecutive card numbers in 
columns 77-79, beginning with 001 for each 
group. 

Figures 27-29 show the card groups of 
Sample Program 2. 



A 


z 

d 

• 


Invoice 
No. 


Dote 


Customner 
No. 


Gross 


Discount 


Not 
Invoict 
Amount 


Sales 
Man 












C 
1 


00000 

114)1 
11111 


000000 

1 1 1 * 11 II 


0000000 

11 M It N » • N 
1111111 


00000000 
nnntiHnnii 
11111111 


n n » k n n » 


00000000 

»*UMli«a<t 
11111111 


uMtm 


00001 
ii ii a u i 
11111 


10000 00 00 000 

UUMttMII UMNHa 
11111111111 


0000001 

mmiiiii 
111111 


100000000000 

i n n ii ii ii it n ii ii it h 

11111111111 




2 


22222 




2222222 


22222222 




22222222 




22222 


22222222222 


2222223 


22222222222 




J 


333)3 




333 333 3 


33333333 




33333333 




33333 


33333333333 


3333331 


33333)33333 




< 


44444 




4444444 


44444444 




(4(44444 




44444 


44444444444 


4444444 


44444444444 




5 


55555 




5555555 


55555555 




55555555 




55555 


55555555555 


555555! 


55555555555 




6 


66666 




6666666 


66666666 




66666666 




6666( 


66666666666 


5 6 6 6 6 6 4 


66666666666 




7 


77777 




7777777 


77777777 




77777777 




77777 


77777777777 


77 77777 


77777777777 




8 

1 


88888 

1 1 1 S 1 

99999 




8888688 

1) U It II II N II 

9999999 


88886888 

11 II 1) t) 11 IS li II 

99999999 


II » H 11 1? II M 


88888688 
it h ii h ii u « « 
99999999 


u«i«a 


88688 

1 Nil M I 

99999 


88888868688 

II U W » M 11 M M N II II 1 

99999999999 


9868868 
i « a ii ii u ii 
1999999 


88868668888 

11 11 11 II II II II II H 11 N 

99999999999 



Figure 26. Input Card for Sales Commission Report 
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fBjyf IBM Sy»um 360 AmmUir (Ming Form 


-sAnnez. cardgkovp rm ™ g - c »« i » f 


r 1 INSIRUUtONS CARDfUCTSO NIIMMR 


S,A,IMtf41 -fr-i-i-.-rw 


Nam* OfWiO'i'jn Op#ion<J Cww l«l| V"*' 

1 1 10 14 16 !0 ?■> 10 .15 « 4S ' i0 55 60 65 71 7J H 


// AS5&rV SYSBlS^l* 79l\T2 PLACE. THIS CQRD IN THE IPL D££K *3*liiL 


// **S*Sr,V SVSRDZ^f l$i\R* PLACE THIS CA*& I* THE IFL 0€CK <9|2*|Z 


// LOO PRlur 10& C0H7RCI CfttCS *30*H* 


// »70tf *r°$^SrlCg COMPtie AhD incur e s^nuc p*o* *f*lOt 


££ ..__>rtT£ 6**0* JfiNVAM l^tUt _ _*jii|iL 


_£ rl5S^/V *¥*W£7 I'll!' *♦ 2f^j c?*** READS k «££*'** 


ft ASS6H H SO Hit' Z*$*\Pl tUUCH FQ& 'HfiPtfCitfS dSJf£7 MCi $9021*7 


/Z ASS**/ fyslJfl^jf'ZJl* T2 i'f*ALk P*m F0« MM 7*/»£ f9^2|lf _ 


// £^£C _ 6l££UTl SAflPLZ 1&C6*M R*Wt1_ 





Figure 27. Job Control Statements for Compile-and-Execute Function 
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Punching 
In. .ruction 


Graphic 
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torn X24-3147 1 
Print**) in U. S. A. 
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Lin* 
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E 
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File Type 




Mode of Processing 


O 

8 

1 

3 

39 


























o 
Z 

| 

53 


























Filename 
71 9 10 II 1} 11 II 


y 

p 
O 

IS 




n 


Length of Key Field or 


Device 

40 41 41 43 44 43 46 


Symbolic 
Device 

47 41 49 30 31 31 


Name of 
Label Exit 

34 55 36 37 54*5? 


Extent Exit 
for DAM 

60 61 61 63 64 63 


File Addition 










< 

44 




16 




End of File 


19 30 




Record Address Type 




~.ytinti*r Ovefflowi 


17 




Sequence 


31 


Type of File 


67 


No. of 


< 
It 
















p 
3? 


Overflow Indicator 


61 69 


Tap* 


> 

19 


(lock 
Length 

30 21 II 13 


Record 
Length 

14 13 16 17 


33 34 


Key Field 

Storting 

Location 

33 36 37 38 




Rewind 


z 

70 


71 77 73 74 
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I l f4f\ 


UT 
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»»*« SAMPLE 2 i CMPGrtOUP S4C O 



Punching 
toMrvctwi 


Graphic 
















Punch 

















Hn* XM-MSO -I 
MM! I* U.S. A. 



7S 74 77 71 7t SO 



Filename 



7 i f 10 II H 13 U 



Record Identification Codes 



Position 



Position 



Position 



Field 
Location 



From 



To 



Field Name 



33 54 13 S* 37 3t 



ii 



Field 
Indicators 



Starling 

Sign 
Position 



4» 70 71 73.73 74 



/■ WOT i . 



9£ 



14 



Ci 



A 



A 



*W * W 



H 



JA 



4AI WK 



L* 



ji , M i ryfiAnr 



-M 



_^M 



MAW 



^1 



Figure 28. Source Statements, Part 3 of 5 
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Foctor 2 

31 34 33 M 17 31 3» 40 41 41 


totult FMd 

43 44 43 4* 47 4t 


i 

i 

4* 50 31 SI 
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« 10 M 


i 

ii >i u 


i 

ii i» i' 


S3 34 S3 


5* 37 


30 3* 


1 Q I 


i 


,11 


> ■ 




WtflflT* ■ , , 


6.WT.P. 
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i: 
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fttlyl DM Ii^b/WO Mimllin fata* tea 


•JZZl*. 


"oo»* 5AMPLE 2, C^M) GftOuP R.91 ««.«<> «*"« •»« 1 « 1 


f r»UW.tlONS <A*& f lilltO NUMM 
NOOMMMH 1 0*11 H»*CH 


HMI«NI „_,._-, . 


t4fM Opmtt*. 0»nwj 
1 i 10 14 It N IS » U • « 


Cam II HH fr»WWI 

30 U M tt 7( 73 H 


5Ui"l£ 04l9»4£4 •3ui^JsJE3l3 


R9124J1 


5ift3i»k fi^HZ6S Jl^b5«^3U 


R112442 


511^6 i42|4lt 4444307 50313 


R912003 


514495 043^567 004584350313 


R912004 


5 lii^b 4424411 044434750 l +l3 


R912005 


i00$27 $$06543 999999990425 


R912006 


£41543 444^5 t *3 444444i4442sT 


R912007 


543095 H52bb3 000444454425 


R912008 
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R912009 
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544188 J434592 444340449999 


8.912416 


5081i8 4589047 00340044992^ 


R912017 


L* - . 


R112418 




1111 11 



Figure 29. Data Cards 



OPERATING PROCEDURES 

The sample deck supplied ty IBM is designed 
for Model 20 systems with a storage capaci- 
ty of 8192 bytes and the following I/O 
devices: 



• an I EM 2501 Card Reader, 

• an IBM 1442 Card Punch, 

• an IBM 1403 Printer, 

• an IBM 2415 Magnetic Tape Unit, any 
model (9-track drives with unit numbers 
80 and 81) . 

If the user's Model 20 system has a dif- 
ferent I/O configuration or different tape 
unit numbers, the job control cards and/or 
the REP cards supplied with the tape IPL 
must be changed accordingly. 

The following steps must be taken to 
compile the source program, execute it 
immediately after compilation, and obtain 
the object program in punched cards. 

1 . Mount the system tape (containing the 
TPS Report Program Generator) on the 
tape drive assigned to SYSRES (see 
ASSGN card in group R90) . Press the 
Load-Rewind key and the Start key of 
the drive. 

2. Mount a work tape on the tape drive 
assigned to SYS000 (see ASSGN card in 



9. 



group R90) . Press the Load-Eewind key 
and the Start key of the drive. 



Remove the ASSGN cards for SYSRES and 
SYSRDR from card group R90 and place 
them in the IPI deck, in front of the 
REP cards (if used) and the end-of-file 
card. Place this deck into the hopper 
of the loading unit (2501 in the 
example) . 

Place card group E90 (jot control 
cards) into the hopper of SYSRDR (2501 
in the example) . 

Place the card group identified ty the 
letters S'ACO in cols. 76-79 (RPG con- 
trol card and sample source program) 
into the hopper of SYSIPT (2501 in the 
example) . 

Place card group R9 1 (data cards) into 
the hopper of the 2501. (If a 2501 is 
not available and the data cards are to 
be read on a different device, the file 
description specifications must te 
changed accordingly.) 

Place blank cards into the hopper of 
SYSCPT (1442 in the example) . 

Press the Start keys of the card I/O 
devices used. 

Install forms in the printer (1403 in 
the example) and press the Reset key 
and the Start key of the device. 
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10. Set the Register- Data/Address switches 
on the CPU console to an even main, 
storage address between hexadecimal 
009C and the end-of -storage address 
minus hexadecimal 0052. 



Upon completion of the compilation, a 
system halt occurs and the code 1D01 is 
displayed. To initiate the execution of 
the sample program, press the Start key on 
the CPU console. 



11. Set the Mode switch on the CPU console 
to PROCESS. 

12. Press the Load key on the CPU console. 

The RPG listing, part of which is shown 
in Figure 30, is obtained on the printer. 
The object program deck is produced on the 
1442. 



The output from the sample program is 
the printed report shown in Figure 31 . 

The object deck obtained on SYSOPT may 
be used to execute the sample program under 
ccntrol of the card-resident system or 
include it in the program library of the 
system tape. 
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1 01010 


FINPUT 


IP 








Rl 


EAOO 


1 




2 01020 


FPRINT 
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2 


11 












22 04100 













COMM 


72 


t 


• 0. • 


23 04110 









N22 






59 


•IOC 


i 


24 04120 









22 






59 


•12C< 


i 


25 04130 













IVCAMT 


53 


* , 


i 0. • 


26 04140 













INVOIC 


41 






27 04150 













CUST Z 


34 






28 04160 









LI 




SALESM 


26 






29 04170 





T 


21 


LI 












30 04180 















56 


•TOTAL* 


31 04190 













SUM B 


72 


t 


« 0. ■ 


32 04200 





T 


01 


LR 












33 04210 















56 


•FINAL TOTAL" 


34 04220 













FINTOT 


72 


• 


« 0. • 



SACO 

SACO 
SACO 



SACO 
SACO 
SACO 
SACO 
SACO 



SACO 
SACO 
SACO 
SACO 
SACO 



SACO 
SACO 
SACO 
SACO 
SACO 
SACO 
SACO 
SACO 
SACO 
SACO 
SACO 
SACO 
SACO 
SACO 
SACO 
SACO 
SACO 
SACO 
SACO 
SACO 
SACO 
SACO 



Figure 30. Sample of RPG Listing 
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SALESMAN CUST INVOICE AMOUNT 



PERC COMMISSION 



0313 



9450 00015 

11269 00344 

20011 10046 

34567 10095 



4,730.50 


10 


473.05 


10,665.00 


12 


1,279.80 


30.75 


10 


3.08 


580.35 


10 


58.04 


TOTAL 


1,813.97 



SALESMAN CUST INVOICE AMOUNT PERC COMMISSION 



0413 20011 10046 



30.75 10 



TOTAL 



3.08 



3.08 



SALESMAN CUST INVOICE AMOUNT 



PERC COMMISSION 



0425 6543 00027 999,999.99 12 120,000.00 

7543 07543 .10 10 .01 

50663 03095 .05 10 .01 

TOTAL 120,000.02 

SALESMAN CUST INVOICE AMOUNT PERC COMMISSION 

0837 175 00127 



.05 10 



TOTAL 



.0 1 



.01 



Figure 31. 



Output of Sample Program 2 # 
Part 1 of 2 



SALESMAN CUST INVOICE AMOUNT PERC COMMISSION 

0847 175 00127 .05 10 .01 



TOTAL 



.0 1 



SALESMAN CUST INVOICE AMOUNT PERC COMMISSION 

1084 00000 20,202.02 12 2,424.24 



TOTAL 



2,424.24 



SALESMAN CUST INVOICE AMOUNT PERC COMMISSION 

2515 00003 .00 10 .00 

9999999 00053 10,665.00 12 1,279.80 



TOTAL 



1,279.80 



SALESMAN CUST INVOICE AMOUNT PERC COMMISSION 



9999 1269 00088 30.00 10 

2701269 88188 30,000.00 12 

34592 00188 300.00 10 

589047 08188 3,000.00 10 

TOTAL 
FINAL TOTAL 



3.00 

3,600.00 

30.00 

300.00 

3,933.00 
129,454.13 



Figure 31. Output of Sample Program 2, 
Part 2 of 2 
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SAMPL E PROGRAM 3 

The third sample program is designed to 
demonstrate : 

• the use of the Utility programs, 

* the use of the Sort/Merge program. 

With the sample deck supplied by IBM, 
the following jobs can be performed: 

1. Initialize-Tape job, 

2. Card-to-Tape job, 

3. Tape-to-Printer job (unsorted records) , 

4. Sort job, 

5. Tape-to-Printer job (sorted records) . 

DESCRIPTION OF THE SAMPLE DECK 

The sample-program cards (eleven groups) 
are identified by a letter in column 73 and 
two digits in columns 74-75. (See list 
below .) 

Card column 76 contains a 2 (identifi- 
cation for TPS) . 

Card columns 77-79 contain consecutive 
card numbers, which begin with 001 for each 
card group. 

Sample deck 3 consists of the following 
card groups: 



Columns 

73_74_75 Description 



Job control cards for Initialize- 
Tape job 



Program control card for 
Initialize-Tape Program 



V 9 Job control cards for Card-to- 

Tape job 

V 9 1 Program control cards for Card- 

to-Tape job 

V 9 2 Data cards 

W 9 Job control cards for Tape-to- 
Printer job (unsorted records) 

W 9 1 Program control cards for Tape- 
to-Printer job (unsorted records) 

S 9 Job control cards for Sort job 

S 9 1 Program control cards for Sort 
job 

W 9 2 Job control cards for Tape-to- 
Printer job {sorted records) 

W 9 3 Program control cards for Tape- 
to-Printer job (sorted records) 

Figures 32-37 show the card groups of 
Sample Program 3. 



*my[ IIM Systtm/MO Afwakfcr (Miaf hm .-~~ 
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rtOGUMMI | DM! ruNLH 
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~(_t ASS6N svi*is+i'li£' .Tl ?tAC£ THIS Cflftp IH TUB 1PL D€Ck K3$Zi4i 


ft QtSb* H**0* y X' 2!#\*6 2f6» Pir/MAffy H0PP£* llitiil 


U L6£ PtlkT jig CONTROL C)*QS tqlU + l 


II 10& INTTTf IHLTlALIlZ-TAPe r*06*A~H tS$U4l 


it Dftrg itUz JAuvAtv 1.11*9 i94z§p's 


LL. couf& iX- i* W*l 5r e «ftj£ _ UMP'i 


U AlSl* SViUi^f 11L\U__ _ &-L*A£.k P_R_LV£ F0* OUTPUT T*H J9JUM7 
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LL Hit _ tHlM 
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Figure 32. Job Control and Program Control Statements for Initialize-Tape Job 
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Figure 33. Job Control and Program Control Statements for Card-to-Tape Job 
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Figure 34. Data Cards 
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Figure 35. Job Control and Program Control Statements for Tape-to-Printer Jot 
(Unsorted Records) 
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Figure 36. Job Control and Program Control Statements for Sort Job 
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Figure 37. Job Control and Program Control Statements for Tape-to-Printer Job (Sorted 
Records) 



OPERATING PROCEDURES 

The sample deck supplied by IBM is designed 
for Model 2 systems with: 

a) a storage capacity of 4096 bytes and the 
following I/O devices: 

an IBM 2560 MFCM, 

an IEM 1403 Printer, 

an IBM 2415 Magnetic Tape Unit Model 1 

or 4 (9-track drives with unit numbers 

80 and 81) ; 

b) a minimum storage capacity of 8192 bytes 
and the following I/O devices: 

an IBM 256 HFCM., 

an IBM 1403 Printer, 

an IBM 2415 Magnetic Tape Unit, any 
model, (9-track drives with unit num- 
bers starting at 80). 



Operating Pro cedure ( 4K) 

The following is a description of the 
operating procedure for a configuration as 
described under (a) above. 

If the sample jobs are to be executed 
with a different. I/O configuration, the 
ASSGN statements and the other job control 
statements of the sample programs must be 
changed according to the I/O 
c ha r a c te r is ti cs . 

If the physical addresses of the user's 
tape drive differ from the standard assign- 
ments (780-785) , the SEP cards at the end 
of the Monitor deck must be changed accor- 
dingly. (See the description of the REP 
cards in the SRL publication IBM Syst em/3 60 
Model 20, Tape ^Programming Syst em, Contr ol 
and .Service Programs, Form C2 4-9000.) 

Initializ e-T ape Run 



1. Mount a tape on the drive assigned to 
SYS000 (see ASSGN card in group X90) . 



Press the Load-Rewind key and the Start 
key of the drive. 



Place the following cards into the hop- 
per of the loading unit (2560 primary 
hopper in the example) : 

• the card IEL deck, 

• the ASSGN card for SYSRDB (see group 
X90) , and 

• the Basic Monitor card deck. 

Place the following cards into the hop- 
per of SYSRDR: 

• phases 00, 01 and 02 of the Job Con- 
trol program deck, 

• card group X90 (job control state- 
ments — excluding the ASSGN card 
for SYSRES) , 

• phase 03 of the -Job Control program 
deck, 

• the Initialize-Tape Utility program 
deck, and 

• card group X91 (program control 
statement) . 

Press the Start key of the device. 

Press the Reset key and the Start key 
of the printer assigned to SYSLOG. 

Set the Address switches on the CPU 
console to 009C. 

Press the Load key on the CPU console. 



A standard volume label will be written 
on the tape mounted on drive SYS000. The 
tape will be rewound so that the card-to- 
tape job can be run next. The system halts 
and code 0B20 is displayed. 
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Card-to-Tape Run 



Tape-tp-Printer Bun 



1. The labeled tape (mounted on the drive 
assigned to SYSOPT — see ASSGN card in 
group V90) is positioned at the load 
point and ready, from the previous run, 



1 . The tape to be printed (mounted on the 
drive assigned to SYSIFT — see ASSGN 
card in group W90) is positioned at the 
load point and ready, from the previous 
run. 



2. Place the following cards into the hop- 
per of the loading unit (2560 primary 
hopper in the example) : 



• the card IPL deck, 



• the ASSGN card for SYSRDR (see card 
group X9C) , and 



2. Place the following cards into the hop- 
per of the loading unit (2560 primary 
hopper in the example) : 

• the card IPL deck, 

• the ASSGN card for SYSRER (see card 
group X90) , and 

• the Basic Monitor card deck. 



• the Basic Monitor card deck. 



3. Place the following cards into the hop- 
per of SYSRER: 

• phases 00, 01 and 02 of the Job Con- 
trol program deck, 

• card group V90 (jot control 
statements) , 

• phase 03 of the Job Control program 
deck, 

• phase 00 of the Card-to-Tape Utility 
program deck, 

• card group V91 (program control 
statements) , and 

• the remainder of the Card-to-Tape 
Utility program. 

4. Place card group V92 (.data cards I and 
an end-of-file card into the hopper of 
SYSIPT Csee ASSGN card in group V90) . 

5. Press the Start key of the device used. 

6. Press the Reset key and the Start key 
of the printer. 

Set the Address switches on the CPU 
console to 009C. 

Press the Load key on the CPU console. 

After halt 0C2F is displayed, press the 
start key on the CPU console. 

The card file is blocked with five reco- 
rds in a block and written on the tape 
mounted on drive SYSOPT. The tape will be 
rewound so that the tape-to-printer job can 
be run next. The system halts and code 
0B20 is displayed. 



3. Place the following cards into the hop- 
per of SYSRDR: 

• phases 00, 01 and 02 of the Job Con- 
trol program deck, 

• card group W90 (job control 
statements) , 

• phase 03 of the Job Control program 
deck, 

• phase 00 of the Tape-to-Printer Uti- 
lity program deck, 

• card group W91 (program control 
statements) , and 

• the remainder of the Tape-to-Printer 
Utility program deck. 

4. Press the Start key of the device. 

5. Press the Reset key and the Start key 
of the printer. 

6. Set the Address switches on the CPU 
console to 009C. 

7. Press the Load key on the CEU console. 

The tape file written by the card-to- 
tape utility program is printed out using 
the display option of the tape-to-printer 
utility. The five records in each block 
are identified by the indicators on the 
left side of the printed output. The tape 
will be rewound. The system halts and code 
0B20 is displayed. 



Oper a ting_ Procedure {8K1 

The following is a description of the 
operating procedure for Model 20 systems 
with a minimum storage capacity of 8192 
bytes and the following I/O devices: 
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• an IBM 2560 MFCM 

• an IBM 1403 Printer 

• an IEM 2415 Magnetic Tape Unit, any 
model, (9-track drives with unit numbers 
starting at 80) . 

If the user's Model 20 system has a dif- 
ferent I/O configuration or different tape 
unit numbers, the ASSGN cards in the sets 
of job control cards and/or the REP cards 
supplied with the tape IPL must be changed. 

If the user's Model 20 system includes 
two tape. drives only, the last two sample 
jobs (sorting of records and printing of 
sorted records) cannot be performed. 

The following steps must be taken to 
perform the five (stacked) sample jobs: 

1. Mount the system tape (containing the 
Utility programs and, if the Sort job 
is to be performed, the Sort/Merge pro- 
gram) on the tape drive assigned to 
SYSBES (see ASSGN card in group X90) . 
Press the Load-Rewind key and the Start 
key of the device. 

2. Mount a blank tape on the tape drive 
assigned to SYS000 in card group X90, 
and press the Load-Rewind key and the 
Start key of the drive. 

3. Remove the ASSGN cards for SYSRES and 
SYSRDR from card group X90 and place 
them in the IPL deck, in front of the 
REP cards (if used) and the end-of-file 
card. Place this deck into the hopper 
of the loading unit (2560 primary feed 
in the example) . 

4. Remove the CONFG cards from card groups 
X90, V90, and w90. (These cards are 
used in a card-resident system run.) 

5. Place card groups X90-V91 and W90-W91, 
in the sequence shown in the above 
list, into the hopper of SYSRDR (2560 
primary feed in the example) . 

6. If the Sort job is to be performed, 
place card groups S90-W93 into the 
hopper of SYSRDR, behind group W91. 

7. Place card group V92 (data cards) and 
an end-of-file card into the hopper 
of SYSIPT (2560 secondary feed in the 
example) . 



Press the Start key of the card device 
used. 



Install forms in the printer, and press 
the Reset key and the Start key of the 
device. 



10. Set the Register-Data/Address switches 
on the CPU console to an even main 
storage address between hexadecimal 
009C and the end-of-storage address 
minus hexadecimal 0052. 



1 1 . Set the Mode switch on the CEU console 
to PROCESS. 



12. Press the Load key on the CFU console. 

A volume label is written on the tape 
mounted on SYS000. Then, the data is read 
from the cards and written onto the tape. 
In the third job, the data is read from the 
tape and listed on the printer. 

If the Kodel 20 system has two tape 
drives, the sample run is completed. If 
the system has four or six tape drives, a 
PAUSE card is read after the third job, and 
the code 0E40 is displayed. Perform the 
following steps: 

1. Mount an unlabeled output tape on the 
drive assigned to SYS000 in card group 
S90 (job control cards for Sort job) . 

2. Mount an unlabeled work tape on the 
drive assigned to SYS005 in card group 
S90. 

3. Press the Load-Rewind keys and the 
Start keys of the drives. 

4. Press the Start key on the CEU console. 
After halts 1C0A and 1C41 are displayed 
(warning messages) , press the Start key 

on the CPU console. 

The data is read from the labeled tape, 
sorted by the contents of column 27, and 
written onto the unlabeled output tape. 
Ihen, the sorted records are read from the 
tape and listed on the printer. Code 01D0 
is displayed, completing the sample-program 
run . 
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SAMPLE PROGRAM 4 

Sample program 4 for the IBM System/360 
Model 20, Input/Output Macro Definitions 
for the IBM 1419 is designed to perform: 



an assembly of a source program with 
macro instructions for the IBM 1419 
included , 

the reading of banking documents on an 
IBM 1419, 

pocket selection of documents as 
described in the SRL publication IBM 
Syste m/360 Model 20 A _.Disk_and_Tag§ Pro- 
gramming Systems, Input/Output_.Control 
System for the IBM 1419 and 1259 Magnet- 
ic Character R eade r, Form C33-6C01, sec- 
tion Programming, Example , 



printing of the contents of certain 
document fields on a 1403 printer. 



DESCRIPTION OF THE SAMPLE DECK 

The sample program cards are identified by 
the letter Y in column 73. Card column 76 
contains a 2, The deck consists of; 

• two Job Control cards identified by 
punches 90 in columns 74 and 75, 

• the source program containing macro 
instructions for the IBM 1419, identi- 
fied by punches 91 in columns 74 and 75. 



Card columns 77 to 79 contain consecu- 
tive numbers which begin with 001 for both 
card groups. 



The following steps should be followed 
to assemble the source program and obtain 
the executable object program in punched 
cards. 



1. Place the Tape IPL program deck into 
the hopper of the loading unit. 



2. Assign tape units and card reader by 
punching appropriate ASSGN statements 
and inserting them in the IPL deck, in 
front of the HEP cards (if used) and 
the end-of-file card. 

3. Mount the system tape (containing the 
IPS Assembler program and the macro 
library with Basic Monitor and I/O 
Macro Definitions with the Macro 
Definitions for the I.EM 1419 included) 
on the tape drive assigned to SYSRES. 
Press the Load-Rewind key and the Start 
key on the device. 

4. Place the Job Control cards (identified 
by punches ¥90 in columns 73-75) with a 
// DATE card and ASSGN cards for 
SYSIPT, SYSOPT, SYSLST, SYS000, and 
SYS001 to be punched by the user and to 
be inserted after the // JCE card into 
the hopper of the card reader assigned 
tc SYSRDR. 

5. Place the card group identified by Y91 
in columns 73 to 75 (sample source pro- 
gram) in the hopper of the unit 
assigned to SYSIPT. Press the Start 
key of this device. 

6. Place blank cards in the hopper of the 
unit assigned to SYSOPT and press the 
Start key of this device. 

7. Mount work tapes on the tape drives 
assigned to SYS000 and SYS001. Press 
the Load-Rewind and Start keys of these 
drives. 



OPERATING PROCEDURES 

The sample deck supplied by IBM is designed 
for Model 20 systems with a storage capaci- 
ty of at least 8192 bytes and the following 
I/O devices: 

• A card reading device to be assigned by 
the user, 

• An IBM 1419 Magnetic Character Reader, 

• An IBM 14C3 Printer 



Moreover, the configuration reguirements 
of the TPS Assembler program are to be met. 
Since the object program is to re punched, 
a card punching device is reguired. 



8. Install forms on the printer and press 
the Reset key and the Start key of the 
printer. 

9. Set the Register-Data/Address switches 
on the CPU console to an even main 
storage address between hexadecimal 
009C and the end-of-storage address 
minus hexadecimal 0052. 

1C. Set the Mode switch on the CPU console 
to PROCESS. 

11. Press the Load key on the CPU console. 



The object program contained in punched 
cards is obtained from the unit assigned to 
SYSOPT. 
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Execution of the Object Program under 
Control_of_the_Card-fiesident_S2stem 

The following steps must be taken to 
execute the object program obtained as card 
output from the Assembler program under 
control of the Card-Resident System. 

1. Place the card IPL deck in the hopper 
of the loading unit. 

2. Assign a card reader to SYSBDS by 
punching the appropriate ASSGN card and 
inserting this card behind the IPL 
deck . 

3. Place the card Basic Monitor deck into 
the hopper of the loading unit. 

4. Place into the hopper of SYSRDR: 



phases 00, f 01 and 02 of the Job Con- 
trol program deck 

a // JOB card (to be prepared by the 
user) 

a // DATE card (to be prepared by 
the user) 

an ASSGN card for SYSLST (to be pre- 
pared by the user) 

phase 03 of the Job Control program 
deck 

the sample program object deck. 



5. Press the Start key on the card reading 
device 



ments should be prepared according to 
the description in the SRL publication 
IBM System/360 Model 20, Disk and Tape 
Programming Systems J _Input/gutput_Con- 
^ol_Sls^em_for_the_IEK_J419_and_125S 
Magnetic Character Eeaders , Form C 3 3 - 
6001, section Progr amming Example . 



10. Press the Reset, Restore, and Start 
keys of the IBM 1119. 

11. Set the Time-Sharing switch on the CPU 
to TIME SHARING. 

12. Set the Kode switch on the CPU to 
PROCESS. 

13. Set the Register-Data/Address switch on 
the CPU console to an even main storage 
address between hexadecimal 009C and 
the end of storage minus hexadecimal 
0052. 

14. Press the Load key on the CPU console. 

The sample program causes the IBM 1419 
to read and pocket-select documents as 
described in the above referenced SRL 
publication. 

The IEM 1403 printer lists the contents 

of the amount and transit routing fields 

and the number of the pocket into which 
documents are selected. 

After 50 documents have teen read, the 
amount totals are printed, a programmed 
halt occurs, and the code 0B20 is displayed 
on the CPU console. 



61 Press the Reset and Start keys on the 
printer. 

7. Press the amount and transit routing 
Validity-Check and Head-Out keys on the 
IBM 1419. Only these two Validity- 
Check keys should be pressed. 

8. Press the Program-Sort key on the IBM 
1419. 

9. Feed sample banking documents into the 
hopper of the IBM 1119. These docu- 



Mc t e : The sample program can 
to run on a system that includ 
(For details of the program mo 
see the SRL publication IBM Sy 
M ode l 20, Disk and Tape Progra 
£ems x _In£ut/Output_Control_Sys 
IBM 1419 and 1259 Magnetic Cha 
Readers, Form C33-6001). The 
procedure described above may 
run the sample program if the 
corresponding to the 1419 keys 
are pressed as directed. 



be modified 
es the 1259. 
dif ications, 
stem/360 
aiming Sys- 
tem for the 



racter 
operating 
be used to 
1259 keys 
listed above 
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SAMPLE PROGRAM 5 

Sample program 5 illustrates the use of the 
Model 20 BSCA ICCS for a non-switched, 
point-to-point line configuration with no 
leading graphics and no limited conversa- 
tional mode. The sample program is split 
into two separate, self-contained parts: 

• the "master" program, which transmits 

data read from cards, and 

• the "slave" program, which punches the 

transmitted data into cards. 



Card column 76 contains a 2 (identifi- 
cation for TES) . 



MACHINE REQUIREMENTS 

Assembly 

The sample programs with the BSCA IOCS rou- 
tines have been designed for assembly on 
Model 20 systems with a main-storage capa- 
city of 16,384 bytes and the following I/O 
configuration: 

• An IEM 2501 Card Reader 



DESCRIPTION OF THE SAMPLE DECK 

The two parts of the sample program deck 
are identified as follows: 



Columns 
73 74 75 



Z 9 
Z 9 



D escr ip tion 



Master program 
Slave program 



• An IEK 2520 Card Punch 

• An IBM 2415 Magnetic Tape Unit with 
three tape drives 

• An IBM 1403 or 2203 Printer. 

if the user's Kodel 20 has a different 
main-storage capacity or I/O configuration, 
the job-control cards (statements 1 to 9 in 
Figure 38) must be changed accordingly. 



IBM 







(Figure 38. Job Control and DTF Statements supplied for Assembly of the (Master) Sample 
Program 
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'Figure 39. Job Control Cards Required for Execution of the Sample Program 



Execution 

The sample programs have been designed for 
execution on systems with the following I/O 
devices : 

a) For the master program: 

• An IBM 2501 Card Reader 

• An IEM 1403 or 2203 Printer 

• The Binary Synchronous Communica- 
tions Adapter (Feature No. 2074) 

b) For the slave program: 

• An IBM 2520 Card Punch 

• An IEM 1403 or 2203 Printer 

• The Einary Synchronous Communica- 
tions Adapter (Feature No. 2074). 

If the user's I/O configuration differs 
from that shown above, the DTFSR cards in 
the source sample program (s) (see Figure 
38) must be changed. 

It is assumed that 16,38 4 bytes of main 
storage are available for execution; if the 
user's Model 20 has a different storage 
capacity, the appropriate job-control card 
(statement 4 in Figure 39) must be changed. 



OPERATING PROCEDURES 

Assembly 

The following steps must be taken to 
assemble the master or the slave source 
program and obtain the object program in 
the required form: 

1. Place into the hopper of the loading 
unit : 



(a) the tape IPL deck up to and includ- 
ing the END card. 



(b) an ASSGN card for SYSRES (prepared 
by the user) 

(c) an ASSGN card for SYSRDR (prepared 
by the user) if SYSEER is not the 
IEM 2501 Card Reader 

(d) the end-of-file card (/* in columns 
1 and 2) . 

Mount the system tape on the drive 
assigned to SYSRES and press the Load- 
Rewind key and the Start key of the 
drive. 

Kount work tapes on the drives assigned 
to SYS000 and SYS001. Press the Load- 
Rewind keys and the Start keys of these 
drives. 

If the object program is to be put onto 
tape in card-image format for surse- 
quent execution under control of the 
taje- resident system, perform the addi- 
tional steps (a) and (b) belcw. Other- 
wise, (if output in cards is required) 
continue with step 5. 

a) Change the ASSGN SYSCPT card 
(statement 7 of Figure 38) . 

b) Mount an output tape on the drive 
assigned to SYSCPT and press the 
Load-Rewind key and the Start key 
of the drive. 

Place the job-control cards (statements 
1 to 9 in Figure 38) into the hopper of 
the card reader assigned to SYSRDR. 
Press the Start key of this device. 

Place the sample source program into 
the hopper of the device assigned to 
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SYSIPT. Press the Start key of this 
device. 

7. Prepare and start the printer. 

8. Set the Register- Data/Address switches 
on the CPU console to 0C9C. 

9. Set the Mode switch on the CPU console 
to PROCESS. 

10. Press the Load key on the CPU console. 

The object program, either contained in 
punched cards or {if step 4 has been car- 
ried out) on tape in card-image format, is 
obtained from the unit assigned to SYSOPT. 



Execution under Control of the 
Card-Resident,., System 

The following steps must be taken to 
execute the object program obtained as card 
output from the assembler program, under 
control of the card-resident system: 

1. Place the card IPL deck into the hopper 
of the loading unit. 

2. Punch an ASSGN card for SYSRDR and 
place it behind the card IPL deck. 

3. Place the following into the hopper of 
the card reader assigned to SYSRDR: 

(a) Phases 00, 01 and 02 of the job- 
control program deck. 

(b) The job-control cards shown in 
Figure 39. (These cards must be 
prepared by the user) . 

(c) Phase 03 of the job-control program 
deck. 

(d) The sample program object deck 
(excluding, for the master program, 
the data cards and the end-of-file 
card) . 

4. For the master program only: Place 
into the hopper of the device specified 
in the DTFSR statement (statement num- 
ber 20 in Figure 38) the data cards and 
the end-of-file card. 

5. For the master program: 

Press the Start key on the card 
reader. 
For the slave program: 

Press the Start key on the card 
punch. 

6. Press the Reset key and the Start key 
on the printer. 

7. Press the Load key on the CPU console. 



Execution, under ^,Control_of ..the 
Tape- Res i den t _ System 

Execution under control of the tape- 
resident system can be carried out if the 
object program is either: 

• stored on tape in card-image format, 



• contained in the program library of the 
system tape. 

The procedure for obtaining the source 
program on tape in card-image format as 
output from the assembler program is 
described under step 4 of the instructions 
for assembly of the sample program. 

If it is desired to have the sample pro- 
gram (master or slave) on the system tape, 
the object program obtained as output from 
the assembler program (either on tape or in 
cards) must be added to the program library 
section of the system tape by means of the 
CKAIMT program. The procedure for doing 
this is described in the section Updating 

the Program library Sectipn_pf the System 

IJJES. 

The following steps must be taken to 
execute the object program: 

1 . Place into the hopper of the loading 
unit: 

(a) the tape IPL deck up to and includ- 
ing the END card. 

(b) an ASSGN card for SYSRES (prepared 
by the user) . 

(c) an ASSGN card for SYSBDR (prepared 
by the user) if SYSBER is not the 
IBM 2501 Card Reader. 

(d) the end-of-file card (/* in columns 
1 and 2) . 

2. Mount the system tape on the drive 
assigned to SYSRES; press the Load- 
Rewind key and the Start key of this 
drive. 

3. If the object program is stored on tape 
in card-image format, mount this tape 
on the drive assigned to SYSIPT; press 
the Load-Rewind key and the Start key 
of this drive. 

4. Place into the hopper of the device 
assigned to SYSRDR the job-control 
cards shown in Figure 39. These cards 
must be prepared by the user. 

5. For the master program only: Place 
into the hopper of the device specified 
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in the DTFSE statement (statement num- 
ber 20 in Figure 36) the data cards and 
the end-of-file card. 

6. For the master program: 

Press the Start key on the card 
reader. 

For the slave program: 

Press the Start key on the card 
punch . 

7. Press the Reset key and the Start key 
on the printer. 

8. Press the Load key on the CPU console. 

The slave program should, if possible, 
be loaded just before the master program. 
If the master program is loaded before the 
slave, the slave must be loaded within the 
next three minutes, otherwise there will be 
a halt with E-S-T-R display 0553 on the 
console of the master CPU. If this hap- 
pens, the master program must be loaded 
again. 

After all the data cards have been read 
and transmitted, a programmed halt occurs 
and code 0F10 is displayed on the consoles 
of both the master and the slave CPUs. 



the SAK byte. This address is obtained 
from the assembly listing of the slave 
program. 

2. Set the Data switch to a value other 
than zero. 

3. Set the Kode switch to STCB ALTER. 

4 . Press the Start key on the CEU console 
to set the SAK byte to the value indi- 
cated by the Data switch. 

5. Set the Kode switch to PEOCESS. 

6. Press the Start key on the CEU console. 
This will cause a halt, with E-S-T-R 
display 0F20 on the console at the 
slave terminal and 0F30 on the console 
at the master terminal. 

To resume operation, the operator at the 
slave terminal must press the Start key on 
the CPU console. 

When the operator at the master terminal 
receives the 0F30 display, he should com- 
municate with the operator at the slave 
terminal, or wait a prearranged time and 
then press START on his console to resume 
operation. 



MANUAL INTERVENTION (SLAVE TERMINAL ONLY) 

If the operator at the slave terminal 
wishes to suspend operation, he must: 

1. Set the Register- Data/Address switches 
on the CPU console to the address of 



HALTS AND ERROR DISPLAYS 

In addition to the standard BSCA IOCS 
halts, there are a number of other halts 
that may occur during execution of the 
master and slave sample programs. These 
halts, together with the restart procedures 
are shown in Figure 40. 
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Restart Procedure 



4 



Press START on the CPU 
to continue the job. 






4 — 



Press START on the CPU 
to discontinue the job. 

No restart procedure. 
— I 



No restart procedure. 
No restart procedure. 



No restart procedure. 



F 2 | Press START on the CPU 
to continue the job. 

13 | Communicate with operator 
of slave station or press 
START on the CPU after a 
prearranged time to resume 
operation. 



Remarks 



Normal program end 



Slave operator has 
interrupted the jot, 



Figure 40. Programmed-Halt Displays and Restart Procedures Associated with Sample Pro- 
gram 5 for the Binary Synchronous Communications Adapter 



Sample Programs 99 



SAMPLE PROGRAM 6 

Sample program 6 illustrates the use of the 
Model 20 BSCA IOCS in a switched configura- 
tion using the ITB feature. The sample 
program is split into two separate, self- 
contained parts: 

• the "master" program, which transmits 
data read from cards, and 

• the "slave" program, which punches the 
transmitted data into cards. 



DESCRIPTION OF THE SAMPLE DECK 

The two parts of the sample program deck 
are identified as follows: 

Columns description 

73 74 75 

Z 9 2 Master program 
Z 9 3 Slave program 

Column 76 contains a 2 (identification 
for TFS) . 



MACHINE REQUIREMENTS 
Assembly 



The sample program with the BSCA IOCS rou- 
tines have teen designed for assembly on 
Model 20 systems with a main-storage capa- 
city of 16,384 tytes and the following I/O 
configuration: 



An IEM 2501 Card Reader 



An IEM 2520 Card Punch 



An IEM 2115 Magnetic Tape Unit with 
three tape drives 



• An IEM 1403 or 2203 Printer 

If the user's Model 20 has a different 
main-storage capacity or I/C configuration, 
the job-control cards (statements 1 to 9 in 
Figure 41) must be changed accordingly. 
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•Figure 41. Job Control and DTF statements supplied for Assembly of the (Master) Sample 
Program (Part 1 of 2) 
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•Figure 42. Job Control Cards Required for Execution of the Sample Program 



Execution 



The sample programs have been designed for 
execution on systems with the following 1/0 
devices: 

a) For the master program: 

• The Binary Synchronous Communications 
Adapter (Feature No. 2074) equipped 
with Automatic Calling (Autodial) (Fea- 
ture No. 1315), Intermediate Block 
Checking (Feature No. 47C0), and Full 



Transparency Text Kode (Feature No. 
4100) . 

• An IBM 2501 Card Reader 

• An IBM 1403 or 2203 Printer 
b) For the slave program: 

• The Binary Synchronous Communications 
Adapter (Feature No. 2C74) equipped 
with Intermediate Elock Checking (fea- 
ture No. 4700) and Full Transparency 
Text Kode (Feature No. 4100). 
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• An IBM 2520 Card Punch 

• An IBM 1403 or 2203 Printer 

If the user's I/O configuration differs 
from that shown above, the DTFSR cards in 
the source sample program (s) (see Figure 
41) must be changed. 

It is assumed that 16,384 bytes of main 
storage are available for execution; if the 
user's Model 20 has different storage capa- 
city, the appropriate job-control card 
(statement 4 in Figure 42) must be changed. 



OPERATING PROCEDURES 

Assembly 

The following steps must be taken to 
assemble the master or the slave source 
program and obtain the object program in 
the required form: 



1 



5. 



For t he_ma st er program only : Remove 
card Z922339 from the master source 
deck and replace it with a card con- 
taining the length of the slave station 
telephone number. Remove card Z922340 
from the master source deck and replace 
it with a card containing the slave 
telephone number itself. 

Place into the hopper of the loading 
unit: 

a) the tape IPL deck up to and includ- 
ing the END card 

b) an ASSGN card for SYSRES (prepared 
by the user) 

c) an ASSGN card for SYSRDR (prepared 
by the user) if SYSRDR is not the 
IBM 2501 Card Reader 

d) the end-of-file card (/* in columns 
1 and 2) . 

Mount the system tape on the drive 
assigned to SYSRES and press the Load- 
Rewind key and the Start key of the 
drive. 

Mount work tapes on the drives assigned 
to SYS000 and SYS001. Press the Load- 
Rewind keys and Start keys of these 
drives. 



If an object progra 
tape in card-image 
guent execution und 
tap e-resident syste 
tional steps (a) an 
wise, (if output on 
continue with step 

a) Change the ASSGN 
ment 7 of Figure 

b) Mount an output 
assigned to SYSO 



m is to be put onto 
format for subse- 
er control of the 
m, perform the addi- 
d (b) below. Other- 
cards is required) 
6. 
SYSOPT card (state- 
41) 
tape on the drive 
PT and press the 



Load-Rewind key and the Start key of 
the drive. 



6. Place the job-control cards (statements 
1 to 9 in Figure 41) into the hopper of 
the card reader assigned to SYSRDR. 
Press the Start key of this device. 



7. Flace the sample source program into 
the hopper of the device assigned to 
SYSIPT. Press the Start key of this 
device. 

8. Prepare and start the printer. 

9. Set the Begister-Eata/Address switches 
on the CPU console to 009C. 

1C. Set the Eode switch on the CPU console 
to PROCESS. 

11. Press the Load key on the CPU console. 

The object program, either contained in 
punched cards or (if step 5 has been car- 
ried out) on tape in card-image format, is 
obtained from the unit assigned to SYSOPT. 

Execution_under_Contrql o f the Card- 
Resident System 

The following steps must be taken to 
execute the object program, obtained as 
card output from the assembler program, 
under control of the card-resident system: 

1. Place the card IPL deck into the hopper 
of the loading unit. 

2. Punch an ASSGN card for SYSRDR and 
place it behind the card IPL deck. 

3. Place the following into the hopper of 
the card reader assigned to SYSRDR: 

(a) Phases 00 and 01 of the job-control 
program deck. 

(b) The job control cards shown in 
Figure 41. (These cards must be 
prepared by the user) . 

(c) Phase 02 of the Job Control program 
deck. 

(d) The sample program object deck 
(including, for the master program, 
the data cards and the end-of-file 
card) . 

4. For the master program: 

Press the Start key on the card 
reader. 
For the slave program: 

Press the Start key on the card 
punch. 

5. Press the Reset key and the Start key 
on the printer. 
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6. Press the Load key on the CPU console. 

Execution under. Co ntr ol of the Tape - 
Res iden t, System . 

Execution under control of the tape- 
resident system can be carried out if the 
object program is either: 

• stored on tape in card-image format, or 

• contained in the program library of the 
system tape. 

The procedure for obtaining the source pro- 
gram on tape in card-image format as output 
from the Assembler program is described 
under step 4 of the instructions for 
assembly of the sample program. 



desired 
r slave 
ogram o 
progra 
st be a 
f the s 
ogram. 
escribe 
am Libr 



to h 
) on 

btain 
m (ei 
dded 
ystem 

The 
d in 
ary_S 



ave the sample program 
the system tape,, the 
ed as output from the 
ther on tape or in 
to the program library 

tape by means of the 
procedure for doing 
the section Updating 
ectipn. of „the .System 



If it .is 
(master o 
object pr 
Assembler 
cards) mu 
section o 
CMAINT pr 
this is d 
t he Pro gr 
Tape. 



The following steps must be taken to 
execute the object program: 

1. Place into the hopper of the loading 
unit: 

(a) the tape IPL deck up to and includ- 
ing the END card. 

(b) an ASSGN card for SYSRES (prepared 
by the user) . 

(c) an ASSGN card for SYSRDR (prepared 
by the user) if SYSRDR is not the 



IBM 2501 Card Reader, 
(d) the end-of-file card (/* in columns 
1 and 2) . 

2. Mount the system tape on the drive 
assigned to SYSRES; press the Load- 
Rewind key and the Start key of this 
drive. 

3. Place into the hopper of the device 
assigned to SYSRDR the job control 
cards shown in Figure 41. These cards 
must be prepared by the user. 

4. For the master program: 

Press the Start key on the card 
reader. 
For the slave program: 

Press the Start key on the card 
punch. 

5. Press the Reset key and the Start key 
on the printer. 

6 . Press the Load key on the CPU console. 

The slave program should, if possible, be 
loaded just before the master program. 

After all the data cards have been read and 
transmitted, a programmed halt occurs. 



HALTS AND ERROR DISPLAYS 

In addition to the standard ESCA IOCS 
halts, there are a number of other halts 
that may occur during execution of the 
master and slave programs. These halts, 
together with the restart procedures, are 
shown in Figure 43. 
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Master 



Slave 



t " r 

Halt code 
ESTR 



0011 



0025 



0040 



0041 



Restart Procedure 



Press START to discontinue 
the job 



Press START to discontinue 
the job via HPR0011 



Press START to discontinue 
the job via HPB0011 






Press START to discontinue 
the job via HPR0011 



Cause 



End of program 



Improper ID-ACK received 
for WRITE CONNECT 



ABORT RCVD 
(error-free) 



ABORT SENT/RCVD and 
macro in error (second- 
level abort) 



0043 



Press START to discontinue 
the job via HPR0011 



Abort during ending macro 



~+ 



O0AB 



Press START to discontinue 
the job via HPR0011 



Unexpected outcome during 
execution of Master Program* 



00FF 



Press START to discontinue 
the job via HPR0011 



Unexpected outcome during 
execution of Slave Program** 



* One of the following error messages will be printed: 
"BSCA ERROR - NCODE XX, LOG" 



"BSCA ERROR - SENSE XX" 
"BSCA ERROR - NCODE xx UNEXP" 
"BSCA ERROR - NCODE XX ITB 7" 



(gives normal code setting and logical error byte 
setting) 

(gives sense byte setting) 

(gives normal code setting) 

(gives normal code setting after seven re- 
transmission tries) 



** One of the following error messages will be printed: 

"BSCA ERROR - COMPL xx LOG xx" (gives completion code and logical error byte 

setting) 



"BSCA ERROR - SENSE xx" 

"BSCA ERROR - COMPL xx" 

"BSCA ERROR - COMPL xx ITB 7" 

"BSCA ERROR - RECORD COUNT" 



(gives sense byte setting) 

(gives completion code) 

(gives completion code setting after seven requests 
for receiving an error-free block have failed) 

(expected record count not equal to received 
record count) 



►Figure 43. Programmed-Halt Displays and Restart Procedures Associated with 

Sample Program 6 for the Binary Synchronous Communications Adapter 
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PROGRAMMED-HALT DISPLAYS AND RESTART PB0CEDURE5 



PROGRAMMED HALTS 

Whenever a programmed halt occurs, the U-L 
fields on the CPU console contain the code 
99. 



In most cases, processing can be resumed 
by following the described restart proce- 
dure. If the normal restart procedure 
fails, press the System Reset key on the 
CPU and restart (reload) the interrupted 
program. If at this point it is still 
impossible to resume successful operation, 
the attention of an IBM customer engineer 
is required. For a Model 20, Submodel 5 
installation, try to restore the micro pro- 
gram before calling a customer engineer. 
(Refer to Appendix B. Micro Program Load 
Procedures . ) 



The section Programmed- Halt.., Di spla ys 
contains a list of all programmed-halt 
codes that may be displayed in the E-S-T-R 
fields on the CPU console during the 
execution of IBM-supplied programs. 



Wherever possible, a brief res 
cedure is given in the list of ha 
for quick reference. Where this 
been possible due to the length o 
cedure, or where additional infor 
required to clarify the brief res 
cedure in the list, a reference n 
given in the rightmost column of 
This number corresponds to a numb 
section Restart Procedures, where 
appropriate information can be fo 



tart pro- 
It codes 



has not 
f the pro- 
mation is 
tart pro- 
umber is 
the list, 
er in the 

the 
und. 



In the section R esta rt Procedures and in 
the list of Pr ogrammed- Halt Displays, 
codes, data, and addresses of storage loca- 
tions are given in hexadecimal notation. 
General register numbers are given in 
decimal notation. 



1 


" ' 
Display 


Device 


1 E 
i 


Q 


T 


R 




1 










1 o 


1 


X 


X 


2501 


1 o 


2 


X 


X 


2560, 2520 


1 o 


3 


X 


X 


1442 


1 o 


4 


X 


X 


1403, 2203 


1 o 


5 


X 


X 


BSCA 


1 o 


6 


X 


X 


1419, 1259 


I o 


7 


X 


X 


2415 



Figure 44. Device-Dependent Halts 



f 



i - '■ 1 

I Display 


Program | 


| E-S- 
i 


-T- 


-R 




| 5 


X 


X 


BSCA IOCS | 


|0 A 





X 


All programs | 


| B 





X 


IPL | 


1 B 


1 


X 


IPL | 


|0 B 


2 


X 


Basic Monitor | 


| B 


3 


X 


Basic Monitor | 


|0 B 


4 


X 


[Job Control | 


| E 


5 


X 


Error Statistics | 


|0 B 


F 


X 


Distribution-Package Retrieval | 


| C 


X 


X 


Utility | 


|0 D 


X 


X 


RPG Object | 


| E 


X 


X 


I/O macros and RPG I/O Routines | 


1 1 A 


X 


X 


Assembler | 


| 1 B 





X 


Load System Tape | 


| 1 B 


1 


X 


Load System Tape I 


| 1 B 


2 


X 


Linkage Editor | 


| 1 B 


3 


X 


Linkage Editor j 


I 1 B 


4 


X 


Core-Image Maintenance | 


| 1 B 


5 


X 


Core- Image Maintenance | 


I 1 B 


6 


X 


Macro Maintenance l 


| 1 B 


7 


X 


Macro Maintenance | 


| 1 B 


8 


X 


Directory Service | 


| 1 B 


A 


X 


Copy System Tape | 


| 1 B 


D 


X 


Core-Image Service/Macro Service] 


I 1 B 


E 


X 


Core-Image Service/Macro Service! 


I 1 c 


X 


X 


Sort/Merge | 


| 1 D 


X 


X 


RFG Compiler | 



Two types of programmed halts may occur 
device-dependent halts and program-depen- 
dent halts. From the code displayed, the 
user can determine the type of halt that 
occurred, and the device or program to 
which it pertains. Figure 44 shows the 
codes used for device-dependent halts, and 
Figure 45 those used for program-dependent 
halts. 



►Figure 45. Program-Dependent Halts 

When a program- dependent halt has been 
caused by an error during a tape operation, 
it is sometimes necessary to identify the 
tape drive concerned. In these cases, the 
displacement of the affected logical unit 
block (symbolic device address) from the 
beginning of the logical unit table is con- 
tained in register 13, in hexadecimal nota- 
tion. Figure 46 shows the arrangement of 
logical unit blocks in the table, and the 
displacement of each block. 
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r ~ i 


■ " 


,, ., 


| Position 


Symbolic Address 


Displacement*! 




i i 


| 1 


| SYSRES 


00 | 


I 2 


SYSRDR 


02 | 


I 3 


SYSIPT 


I 04 | 


I 4 


SYSOPT 


06 | 


I 5 


SYSLST 


08 | 


I 6 


SYSLOG 


OA | 


] 7 


SYS000 


OC | 


I 8 


SYS001 


OE | 


I 9 


SYS002 


10 | 


l 10 


SYS003 


12 | 


I 11 


SYS004 


14 | 


| 12 


SYS005 


16 | 


I 13 


SYS006 


18 | 


| 14 


SYS007 


1A | 


1 15 


SYS008 


1C | 


| 16 


SYS00 9 


1E | 


| 17 


SYS010 


20 | 


| 18 


SYS011 


22 | 


| 19 


SYS012 


24 | 


| 20 


SYS013 


26 | 


I 21 


SYS014 


28 | 


| 22 


SYS015 


2A | 



* in hexadecimal notation 



Figure 46. Arrangement of Logical Unit 

Table, and Displacement of Log- 
ical Unit Blocks 



During the execution of RPG object pro- 
grams, a number of halts may occur that are 
not associated with any halt codes shown in 
the list. These halts occur when an arith- 
metic operation is performed on an invalid 
packed-decimal operand. The operation code 
of the instruction that led to the halt is 
then displayed in the U-L fields. (For 
more details, see the section Using the^TPS 
R epo rt Program Generator. ) 



NON-PROGJAMKED_HALTS 

In addition to programmed halts, the fol- 
lowing non- programmed halts (machine stops) 
may occur during the execution of IBM- 
supplied or user-written programs: 



1 . A CPU process check -- indicated by the 
Process indicator on the CPU console. 

2. A machine check on the 2520 Read/Punch 
or on the 2560 MFCM — indicated by the 
Machine Check light on the affected 
unit. 

3. A specification error (programming 
error stop) — indicated by a nonzero 
I-field on the CPU console. 



After a CPU process 
check on the 2520 or 25 
cedure can be used. If 
to resume successful op 
sing the System Reset k 
reloading the interrupt 
attention of an IBM cus 
normally required. For 
correcting a specificat 
the SRL publication IBM 
20, Funct ional Characte 
5847. A specification 
corrected by the progra 



check or a machine 
60, no restart pro- 
it is not possible 
eration after pres- 
ey on the CPU and 
ed program, the 
tomer engineer is 

information about 
ion error refer to 
_System/360_Model 
ristics, Form A26- 
error can only be 
mmer. 



When a machine stop occurs on a Submodel 
5 and all attempts to resume operation 
fail, try to restore the micro program 
before calling a customer engineer. (Refer 

to App endix B. Micro Program Load 

Proc edu res) . 
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1419/1259 HALTS A ND ERROR DISPLAYS 

In addition to the halts described in the 
section Programmed - Ha lt Displays , certain 
conditions may occur on the IBM 1419/1259 
that do not lead to a programmed halt, but 



cause a 1419 or 1259 stop while the IOCS 
stays in a wait loop. These conditions are 
summarized in figures 47 and 48. A 
detailed description and the appropriate 
restart procedures are given below. 



Identification 



Procedure 



Left-Feed | Start-Key 
Light | Light 

ON | ON 
j. 



i 1 

Film | Endorse-Stop 
Light llndicator 
1 



Stop Restore 



ON 



Advance-Check | 
Stop Indicatorl 

, 

I 

1 



ON 



ON 



h 



ON 



Unrecoverable I/O Error 



Figure 47. Summary of 1419 Halts and Error Displays 



ON 



1 419 Halts and Erro r Di splays 



Procedure 



The Left-Feed light and the Start-Key 
light are on — one or more documents 
may be jammed at the end of the docu- 
ment path. 

Procedure : 

• Clear the path. 

• Place the documents that have been 
read into the correct pockets. 
Return all other documents to the 
hopper. Place any mutilated docu- 
ments into the reject pocket,. 

• Press the 1419 Stop-Restore key. 

• Press the 1419 Start key. 
The Film light is on. 
Procedure : 

• Eliminate the condition that caused 
the 1419 stop. 

• Distribute the documents as 
described above. 

• Press the Start key of the 1419. 



3. The Endorse-Stop indicator and the 
Stop-Restore key light are on. 



• Check the last few documents pro- 
cessed for proper endorsement. 



• Press the Stop-Restore key and the 
Start key of the 1419. 



The Advance-Check-Stop indicator and 
the Stop-Restore key light are on. 
This condition can occur only if the 
Batch Numbering feature is installed 
and the Advance-Check switch is in the 
ON position. The stop is caused by a 
failure to advance the numbering 
device. 

Procedure: 

• Press the Stop-Restore key and the 
Start key of the 1419. 



No error lights are set for the follow- 
ing conditions: 

a) Full pocket 

b) Empty feed hopper 

c) Hopper-feed failure. 

d) 1419 is not operational. 

Procedure: 
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Eliminate the condition that 
caused the stop. 



• Press the Start key of the 1419. 



An unrecoverable I/O error may occur, 
or it may become necessary to terminate 
the job because of a program or other, 
error. Recovery is possible only if 
the program being executed was 
assembled with the EEREXIT detail entry 
specified in the DTFPD reader file- 
definition statement. 



Procedure: 

• Press the stop keys on the 1419 and 
the CPU. 

• Set the PSW (alter register 3) to 
the address of the instruction 
labeled I6ERR0R (obtained from the 
Assembler listing of the program) . 

• Press the Start key on the CPU. 

When the IOCS error recovery is com- 
plete, control is passed to the user's 
error exit routine. 



Procedure 



— b 



Identification 



Transport 
Light 



| Stack er- 
| Command 
| Light 
H 



IFeed 
i Light 



Stacker 
Light 



Short- 
Document 
Light 



Document- 
Gap Light 



ON 



+- 



ON 



+ 



ON 



f 



ON 



ON 



ON 



Unrecoverable I/O Error 



Figure 48. Summary of 1259 Halt and Error Displays 



1-259. Ha Its ...and.. Error, Displays 

1. The Transport light is on -- one or 
more documents may be jammed in the 
document feed path. 



Procedure : 

• Press the Stop key on the CPU. 

• Enter a hexadecimal value other than 
00 into location CE. 

• Press the Start key on the CPU. 

• Halt 0602 occurs. Follow the proce- 
dure described later in this 
section. 



2. The Stacker-Command light is on — the 
user has failed to issue a stacker- 
selection command in time for a docu- 
ment to be directed to the designated 
pocket. 



This condition may also be caused by 
dirty photo cells or multilated 
documents. 



Procedure: 

• Press the Start key on the 1259. 



3. The Feed light is on — either the feed 
hopper is empty or a jam has occurred 
at the separator-retard rollers. 
Procedure : 

• Correct the condition and press the 
start key on the 1259. 



4. The Stacker light is on — one or more 
stacker pockets are full. 

Procedure: 

• Remove documents from the full 
stacker pocket (s) . 
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• Press the Start key of the 1259. 



5. The Short-Document light is on — a 
short or folded document is in the 
feeder area. 



the job because of a program or other, 
error. Recovery is possible only if 
the program being executed was 
assembled with the EBEEXIT detail entry 
specified in the DTFPD reader file- 
definition statement. 



Procedure : 

• Remove the document and press the 
Start key on the 1259. 



6. The Document-Gap light is on — the gap 
between documents is too short. 

Procedure : 

• Tighten the separator-retard rollers 
and press the Start key on the 1259. 



7. An unrecoverable I/O error may occur, 
or it may become necessary to terminate 



Procedure : 



• Press the Stop keys on the 1259 and 
the CPU. 

• Set the PSW (alter register 3) to 
the address of the instruction 
labeled I6ERR0R {obtained from the 
Assembler listing of the program) . 

• Press the Start key on the CPD. 

When the IOCS error recovery is com- 
plete, control is passed to the user's 
error exit routine. 
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RESTflRT_PROCEDURES 

In this section (R est art P roce dures) and 
in the list of Prog rammed-Ha lt Disp lays , 
codes, data, and addresses of storage loca- 
tions are given in hexadecimal notation. 
General register numbers are given in 
decimal notation. 

| 1| The halt indicates one of the follow- 
1 ' ing conditions. 



a) The hopper is empty. 

• Place cards into the empty 
hopper. 

• Press the Start key of the 
affected unit. 

• Press the Start key on the CPU 
console. 



b) The hopper is not empty. In this 
case, the affected unit has not 
been started. 

• Press the Start key of the 
affected unit. 

• Press the Start key on the CPU 
console . 



| 2 | The halt indicates one of the follo- 
1 » wing conditions. 

a) The hopper is empty and there are 
still cards to be processed. 

• Place cards into the empty 
hopper. 

• Press the Start key of the 
affected unit. 

• Press the Start key on the CPU 
console . 

b) The hopper is empty and there are 
no more cards to be processed. The 
card that was the last one in the 
hopper has not yet been processed. 
Therefore, the system must be 
restarted. 

• Press the Start key of the 
affected unit. 

• Press the Start key on the CPU 
console . 

c) The hopper is not empty. In this 
case, the affected unit has not 
been started. 

• Press the Start key of the 
affected unit. 

• Press the Start key on the CPU 
console . 



The stacker is full, or the cover is 
open, or the chip-box is full or mis- 
positioned (punching devices only) , or 
the print-line selector is not locked 
(2560 only) . 



Correct the error condition. 

Press the Start key of the affected 

unit. 

Press the Start key on the CPU 

console. 



| 4 | The read instruction that led to the 

' ' error halt is re-executed upon 

restart. 



Remove the 
hopper. 
Press the N 
Remove the 
stacker and 
the input d 
Check the c 
first card 
the card th 
correct it 
Return the 
hopper. 
Press the S 
unit. 

Press the S 
console. 



input deck from the 

PRO key. 

last two cards from the 
place them in front of 
eck. 

ard that is now the 
of the input deck (i.e., 
at caused the error) and 
if necessary, 
input deck to the 

tart key of the affected 

tart key on the CPU 



| 5 | The error that caused the halt is 
> ' irrecoverable. 

• Re-initiate the system run, begin- 
ning with the IPL procedure. 



| 6j The punch instruction that led to the 
L — J error halt and, if the affected unit 

is a 2520 card read-punch, the preced- 
ing read instruction, are re-executed 
upon restart. 

If the device is used for punching 
only, follow restart procedure 10. 
Otherwise, perform the following 
steps. 

• Mark the last card in the stacker 

(stacker 2 for any model of the 
2520) . 

• Remove the hopper deck. 

• Press the NPRO key and place the 
cards ejected by the NPBO in front 
of the hopper deck. 

• Remove the marked card, which is 
the card that caused the error, 
from the stacker and check it. If 
it does not contain any entries o- 
riginating from earlier processing, 
discard it and place a blank card 
in front of the hopper deck. If 
the card does contain such entries, 
transfer these entries to a blank 
card manually, discard the marked 
card, and place the newly prepared 
card in front of the hopper deck. 

• The second card in the hopper deck 
(behind the blank or newly prepared 
card) may have been misread. Check 
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this card and correct it if 
necessary . 

• Return the hopper deck to the 
hopper. 

• Press the Start key of the affected 
unit. 

• Press the Start key on the CPU 
console . 



| 7| The read instruction that led to the 

1 ' error halt is re-executed upon 

restart. 

• Remove the input deck from the pri- 
mary hopper. 

• If the secondary hopper is also 
used, remove the input deck from 
the secondary hopper. 

• Press the NPRO key. 

• Remove the last three cards from 
stacker 1 and place them in front 
of the input deck for the primary 
hopper. 

• Check the card that is now the 
first card of the input deck for 
the primary hopper (i.e., the card 
that caused the error) and correct 
it if necessary. 

• If the secondary hopper is also 
used, remove the last card from 
stacker 5 and place it into the 
secondary hopper. 

• Return the input deck (s) to the 
hopper (s) . 

• Press the Start key of the 2560. 

• Press the Start key on the CPU 
console . 



Remove the deck from the affected 

hopper. 

Check the first card of the hopper 

deck (i.e., the card that caused 

the check) . 

Repair this card or replace it by a 

duplicate. 

Return the hopper deck to the 

hopper. 

Press the start key of the affected 

unit. 

Press the start key on the CPU 

console. 



10 1 The punch instruction that led to the 
— ^- J error halt is re-executed upon 
restart. 

• The mispunched card is the last 
card in the stacker (stacker 2 for 
the 2520) . Remove this card from 
the stacker and discard it. 

• Press the Start key on the CPU 
console. 



| 11 | The punch instruction that led to this 
L — J error halt is re-executed upon 
restart. 

• Mark the last card in stacker 1 . 

• Press the Start key on the CPU 
console. 

• Remove and discard the mispunched 
card, i.e., the card stacked imme- 
diately behind the marked card in 
stacker 1. 



3| The read instruction that led to the 
-J error halt is re-executed upon 
restart. 

• Remove the input deck from the 
secondary hopper. 

• If the primary hopper is also used, 
remove the input deck from the pri- 
mary hopper. 

• Press the NPRO key. 

• Remove the last two cards from 
stacker 5 and place them in front 
of the input deck for the secondary 
hopper. 

• Check the card that is now the 
first card of the input deck for 
the secondary hopper (i.e., the 
card that caused the error) and 
correct it if necessary. 

• If the primary hopper is also used, 
remove the last two cards from 
stacker 1 and place them into the 
primary hopper. 

• Return the input deck (s) to the 
hopper (s) . 

• Press the Start key of the 2560. 

• Press the Start key on the CPU 
console . 



| 12 1 The punch instruction that led to the 

1 ' error halt is re-executed upon 

restart. 

• Hark the last card in stacker 5. 

• Press the Start key on the CPU 
console. 

• Remove and discard the mispunched 
card, i.e«# the card stacked imme- 
diately behind the marked card in 
stacker 5. 



|13| • Remove the hopper deck and open the 
L — J cover. 

• Mark the card that is either imme- 
diately before or in the read 
station. 

• Manually clear the feed path and 
close the cover. 

• Press the NPRO key to turn off the 
Feed-Check light. 

• Place the marked card and any cards 
that followed it in the feed path 
in front of the hopper deck. 

• Place the cards that preceded the 
marked card in the feed path into 
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the stacker, in the correct order. 

Duplicate and replace any damaged 

cards. 

Return the hopper deck to the 

hopper. 

Press the Start key of the 2501. 

Press the Start key on the CPU 

console . 



|14| The read instruction that led to the 

1 ■ error halt is re-executed upon 

restart. 



Remove the hopper deck and open the 
cover . 

Mark the card that is either in or 
immediately beyond the read sta- 
tion. (This is the card that 
caused the read error.) 
Manually clear the feed path and 
close the cover. 

Press the NPRO key to turn off the 
Feed-Check light. 

Check the marked card and correct 
it if required. 

Place the marked card and any cards 
that followed it in the feed path 
in front of the hopper deck. 
Place the cards that preceded the 
marked card in the feed path into 
the appropriate stacker, in the 
correct order. 

Duplicate and replace any damaged 
cards. 

Return the hopper deck to the 
hopper. 

Press the Start key of the affected 
unit. 

Press the Start key on the CPU 
console. 



| 15 1 The punch instruction (and the pre- 

1 > ceding read instruction if the unit is 

also used for reading) that led to the 
error halt is re-executed upon 
restart. 

• Remove the hopper deck and open the 
cover. 

• Mark the card that is located imme- 
diately beyond the punch station. 
(This card may already be in the 

stacker.) 

• Manually clear the feed path and 
close the cover. 

• Press the NPRO key to turn off the 
Feed-Check light. 

• Place the marked card and all other 
cards removed from the feed path in 
front of the hopper deck, in the 
proper order. 

• Check the marked card. If it does 
not contain any entries originating 
from earlier processing, replace it 
with a blank card. If it does con- 
tain such entries, transfer these 



16| 



i 17 | 



H8| 

i i 



entries to a bl 

and replace the 

the newly prepa 

If the affected 

read-punch, che 

of the hopper d 
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Remove the hopper deck and open the 

cover. 

Manually clear the feed path and 

close the cover. 

Press the NPRO key to turn off the 

Feed-Check light. 

Place the card removed from the 

pre-punch station into stacker 1 if 

the halt code is 0211, and into 

stacker 2 if the halt code is 0212. 

Place the card removed from the 

pre-read station into the hopper. 

Duplicate and replace any damaged 

cards. 

Return the hopper deck to the 

hopper. 

Press the Start key of the 2520. 

Press the Start key on the CPU 

console. 
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cover. 
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Remove the hopper deck and open the 

cover. 

Mark the following cards: 



112 System/360 Model 20 TPS Operating Procedures 



card A (which should be in the pre- 
read station) ; 

card B (which should be in the pre- 
punch station) ; 

card C (which should be the last 
card in stacker 1 if the halt code 
is 0231 , or the last card in stack- 
er 2 if the halt code is 0232) . 
The cards may be mispositioned. If 
they are, try to locate them by 
means of card numbers or other 
identifiers. 

• Manually clear the feed path and 
close the cover. 

• Press the NPBO key to turn off the 
Feed-Check light. 

• Check card C. If it contains 
entries originating from earlier 
processing, transfer these entries 
to a blank card manually and place 
the newly prepared card into the 
hopper. If card C does not contain 
any such entries, place a blank 
card into the hopper. Discard card 
C. 

• Place card B and card A in front of 
the hopper deck, so that card B is 
the first card of the deck. 

• Duplicate and replace any damaged 
cards. 

• Return the hopper deck to the 
hopper. 

• Press the Start key of the 2520. 

• Press the Start key on the CPU 
console. 



J19 | The read instruction that led to the 

1 » error halt is re-executed upon 

restart. 

• Remove the primary-hopper deck. 

• If the secondary hopper is also 
used, remove the secondary-hopper 
deck. 

• Open the cover. 

• Mark that card from the primary 
hopper which is either immediately 
beyond or in the read station. 

• Manually clear the feed path and 
close the cover. 

• Press the NPBO key to turn off the 
Feed-Check light. 

• Place the marked card and the two 
cards from the primary hopper that 
followed it in the feed path in 
front of the primary-hopper deck. 

• If the secondary hopper is also 
used, place the card from the 
secondary hopper that was located 
before the read station in front of 
the secondary-hopper deck. 

• Stack any other cards removed from 
the feed path as required. 

• Check the marked card, which may 
have been misread, and correct it 
if necessary. 

• Duplicate and replace any damaged 



cards. 

• Return the hopper deck(s) to the 
hopper (s) . 

• Press the Start key of the 2560. 

• Press the Start key on the CPU 
console. 



1 2 1 The read instruction that led to the 

L ' error halt is re-executed upon 

restart. 

• Remove the secondary-hopper deck. 

• If the primary hopper is also used, 
remove the primary-hopper deck. 

• Open the cover. 

• Mark the card from the secondary 
hopper that is either immediately 
beyond or in the read station. 

• Manually clear the feed path and 
close the cover. 

• Press the NPRO key to turn off the 
Feed-Check light. 

• Place the marked card and the card 
from the secondary hopper that fol- 
lowed it in the feed path in front 
of the secondary-hopper deck. 

• If the primary hopper is also used, 
place the two cards from that hop- 
per that were located before the 
read station in front of the 
primary- hopper deck. 

• Stack any other cards removed from 
the feed path as required. 

• Check the marked card, which may 
have been misread, and correct it 
if necessary. 

• Duplicate and replace any damaged 
cards. 

• Return the hopper deck (s) to the 
hopper (s) . 

• Press the Start key of the 2560. 

• Press the Start key on the CPU 
console. 



| 21 | The punch instruction that led to the 

1 ' error halt is re-executed upon 

restart. 

• Remove the hopper deck and open the 
cover. 

• Manually clear the feed path and 
close the cover. 

• Press the NPRO key to turn off the 
Feed-Check light. 

• Discard all blank cards removed 
from the feed path. 

• Stack any punched cards removed 
from the feed path as required. 

• If the halt code is 02DU or 03D4, 
remove and discard the last card 
stacked. (This card may have been 
mispunched.) 

• Duplicate and replace any damaged 
cards. 

• Return the hopper deck to the 
hopper. 
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Press the Start key of the affected 

unit. 

Press the Start key on the CPD 

console . 



|22| The punch instruction that led to the 
t- — J error halt is re-executed upon 
restart. 

• Remove the primary-hopper deck. 

• If the secondary-hopper is also 
used, remove the secondary hopper 
deck. 

• Open the cover. 

• Manually clear the feed path and 
close the cover. 

• Press the NPRO key to turn off the 
Feed-Check light. 

• Discard any blank cards removed 
from the feed path. 

• Place the punched cards removed 
from the feed path and originating 
from the primary hopper into stack- 
er 1, in the proper order. 

• If the halt code is 02D4, remove 
the last card from stacker 1 and 
discard it. 

• If the secondary hopper is also 
used, place the punched cards 
removed from the feed path and o- 
riginating from the secondary hop- 
per into stacker 5, in the proper 
order. Then remove the last card 
from stacker 5 and place it into 
the secondary hopper. 

• Duplicate and replace any damaged 
cards. 

• Return the hopper deck (s) to the 
hopper (s) . 

• Press the Start key of the 2560. 

• Press the Start key on the CPU 
console . 



J 23 1 The punch instruction that led to the 

' ' error halt is re-executed upon 

restart. 

• Remove the secondary- hopper deck. 

• If the primary hopper is also used, 
remove the primary-hopper deck. 

• Open the cover. 

• Manually clear the feed path and 
close the cover. 

• Press the NPRO key to turn off the 
Feed-Check light. 

• Discard any blank cards removed 
from the feed path. 

• Place the punched cards removed 
from the feed path and originating 
from the secondary hopper into 
stacker 5, in the correct order. 

• If the halt code is 02D5, remove 
the last card from stacker 5 and 
discard it. 

• If the primary hopper is also used, 
place the punched cards removed 
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Remove the hopper deck(s) and open 

the cover. 

Manually clear the feed path and 

close the cover. 

Press the NPRO key to turn off the 

Feed-Check light. 

Discard any blank cards removed 

from the feed path. 

Place the punched cards removed 

from the feed path (primary feed 

for the 2560) into the appropriate 

stacker (stacker 1 for the 2560) , 

in the proper order. 

If the affected unit is a 2560 and 

the secondary hopper is also used, 

place the punched cards removed 

from the feed path and originating 

from the secondary hopper into 

stacker 5, in the proper order. 

Then remove the last card from 

stacker 5 and place it into the 

secondary hopper. 

Duplicate and replace any damaged 

cards. 

Return the hopper deck (s) to the 

hopper (s) . 

Press the Start key of the affected 

unit. 

Press the Start key on the CPU 

console. 



Remove the secondary-hopper deck. 
If the primary hopper is also used, 
remove the primary-hopper deck. 
Open the cover. 

Manually clear the feed path and 
close the cover. 

Press the NPRO key to turn off the 
Feed-Check light. 
Discard any blank cards removed 
from the feed path. 
Place the punched cards removed 
from the feed path and originating 
from the secondary hopper into 
stacker 5, in the proper order. 
Place the punched cards removed 
from the feed path and originating 
from the primary hopper into stack- 
er 1, in the proper order. Then 
remove the last two cards from 
stacker 1 and place them into the 
primary hopper. 
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Duplicate and replace any damaged 

cards. 

Return the hopper deck (s) to the 

hopper (s) . 

Press the Start key of the 2560. 

Press the Start key on the CPU 

console. 



| 30 | Proceed as described in restart proce- 
1 ' dure 6. (Correct the card that fol- 
lows the marked card. This card con- 
tains the format error.) 



i 1 

I 26 | 

i i 



Check the attached 1403 or 2203 
printer and, if an, error condition 
exists, correct the condition. 
(For the error conditions that may 
occur and the corrective action 
required, refer to the pertinent 
SRL publications.) 

Press the Start key of the printer, 
Press the Start key on the CPU 
console . 



| 27 | The print operation cannot be repeated 
1 ' to correct the error. 

• Mark the misprinted line or correct 
it manually. 

• Press the Start key of the printer. 

• Press the Start key on the CPU 
console . 



28 | The read instruction preceding the 

' error halt is re-executed upon 

restart . 



Remove the hopper deck. 
Press the NPRO key. 

Place the last two cards stacked in 
front of the hopper deck. 
Correct the first card of the hop- 
per deck. (This is the card con- 
taining the error.) 
Return the hopper deck to the 
hopper. 

Press the Start key of the affected 
unit. 

Press the Start key on the CPU 
console. 



| 29 | The two read instructions preceding 
1 1 the halt are re-executed upon restart. 

• Remove the hopper deck. 

• Press the NPRO key. 

• Remove the last three cards from 
the stacker and place them in front 
of the hopper deck. 

• Correct the first card of the hop- 
per deck. (This is the card con- 
taining the error) . 

• Return the hopper deck to the 
hopper. 

• Press the Start key of the 2501. 

• Press the Start key on the CPU 
console. 



| 31 | Proceed as described in restart proce- 
l — j dure 15. (Correct the card that fol- 
lows the marked card. This card con- 
tains the format error) . 



Remove the hopper deck from the 

hopper (primary hopper for the 

2560.) 

If the affected unit is a 2560 and 

the secondary hopper is also used, 

remove the secondary-hopper deck. 

Press the NPRO key. 

If the affected unit is a 2560, 

remove the last three cards from 

stacker 1 and place them in front 

of the primary- hopper deck. 

If the affected unit is a 2520, 

remove the last two cards from the 

stacker and place them in front of 

the hopper deck. 

Replace the card that is now the 

first card of the hopper deck 

(primary-hopper deck for the 2560) 

with a blank card. 

If the affected unit is a 2560 and 

the secondary hopper is also used, 

remove the last card from stacker 5 

and place it into the secondary 

hopper. 

Return the hopper deck(s) to the 

hopper (s) . 

Press the Start key of the affected 

unit. 

Press the Start key on the CPU 

console. 
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I 3 U I This halt code indicates one of the 
' — J following conditions. 

a) A check occurred during object pro- 
gram execution. 

• Empty both hoppers and all 
stackers. 

• Press the NPRO key. 

• Mark the last card in stacker 1. 
•• Place 6 blank cards into the 

primary hopper. 

• Press the Start key of the 2560. 

• Press the Start key on the CPU 
console. 

Operation is resumed, and an infor- 
mation card is punched which con- 
tains relevant details for restart 
procedure 36. (See Figure 49 for 
the format of the information 
card.) If the halt was preceded by 
a punch-card or write-card instruc- 
tion, the instruction (s) is (are) 
re-executed and 1 or 2 correction 
cards are produced. If a halt 
occurs during the punching of the 
information and correction cards, 
follow the appropriate restart pro- 
cedure, which is indicated by the 
halt code. If no error condition 
occurs, the system halts and the 
code 0202 is displayed when the 
information and correction cards 
have been punched. 

• When 0202 is displayed in the 
E-S-T-R fields of the register 
panel, perform restart procedure 
36. 

b) A check occurred after resuming 
operation within this restart pro- 
cedure (see (a) above) . 

• Empty the primary hopper and 
press the NPRO key. 

• Remove and discard all cards 
following the marked card in 
stacker 1. 

• Continue with step 4 under (a) 
above (step 4 is marked by 
double bullets) . 

i 1 

I 35 1 This halt indicates one of the follow- 
1 J ing conditions. 

a) A feed check (possibly combined 
with other type (s) of error) 
occurred during object program 
execution . 

• Empty both hoppers and all 
stackers. 

• Open the cover. 

• Manually clear the feed path and 
close the cover. 

• Press the NPRO key to turn off 
the Feed-Check light. 

• Stack all cards removed from the 



feed path (cards from the pri- 
mary hopper into stacker 1 , 
cards from the secondary hopper 
into stacker 5) , and check the 
stacking sequence. 

• Duplicate and replace any 
damaged cards. 

• Mark the last card in stacker 1. 

• Continue with step 4 of restart 
procedure 34a (step 4 is marked 
by double bullets) . 

b) A feed check occurred after resum- 
ing operation within restart proce- 
dure 34. 

• Empty the primary hopper and 
open the cover. 

• Manually clear the feed path and 
close the cover. 

• Press the NFRO key to turn off 
the Feed-Check light. 

• Discard all cards removed from 
the feed path and all cards fol- 
lowing the marked card in stack- 
er 1. 

• Continue with step 4 of restart 
procedure 34a (step 4 is marked 
by double bullets) . 



| 36 | This halt indicates one of the follow- 
L • ing conditions. 

a) Restart 34 has been completed suc- 
cessfully and the system is ready 
for restart 36. (Upon restart 36, 
object program execution is 
resumed.) 

• Empty the primary hopper. 

• Press the NPRO key. 

• Remove all cards following the 
marked card from stacker 1 . 
Discard any blank cards. The 
card immediately behind the 
marked card is the information 
card. The format of this card 
is shown in Figure 37. The 
information card may be followed 
by 1 or 2 correction cards. 

• If a rewritten correction card 
was stacked behind the informa- 
tion card, look for the last 
card written before the halt 
occurred. This card is either 
the card that is now the first 
card in the stacker specified in 
column 6 of the information card 
or the last card of the deck 
removed from the stacker speci- 
fied in column 8 of the informa- 
tion card. Check whether this 
card contains entries 
originating from earlier proces- 
sing. If this is the case, 
manually transfer these entries 
to the rewritten correction 
card. Replace the last card 
written with the correction 
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b) A 



card. 

Starting with the marked card, 
remove from stacker 1 the number 
of cards specified in column 9 
of the information card and 
place them in front of the 
primary-hopper deck. 
Starting with the last card 
stacked, remove from stacker 5 
the number of cards specified in 
column 10 of the information 
card and place them in front of 
the secondary-hopper deck. 
Remove all cards (if any) from 
the stackers and place them 
behind the appropriate stacker 
decks. 

If a repunched correction card 
was stacked behind the informa- 
tion card, look for the last 
card punched before the halt 
occurred. This card is now the 
first card of the hopper deck 
specified in column 3 of the 
information card. Check whether 
this card contains entries orig- 
inating from earlier processing. 
If this is the case, manually 
transfer these entries to the 
repunched correction card. 
Replace the last card punched 
with the correction card. 
If column 1 of the information 
card does not contain a 1-punch, 
look for the card that caused 
the preceding error halt. If 
column 3 of the information card 
contains 1, the error halt was 
caused by the card that is now 
the second one in the primary- 
hopper deck. If column 3 of the 
information card contains 2, the 
error halt was caused by the 
card that is now the second one 
in the secondary-hopper deck. 
If necessary, correct the card 
that caused the check. 
Return the hopper decks to the 
hoppers and the stacker decks to 
the stackers. 

Press the Start key of the 2560. 
Press the Start key on the CPU 
console. 

Discard the information card and 
any replaced cards. 

check occurred upon restart 36a. 
Empty both hoppers and stackers 
1 and 5. 

If the Feed-Check light is off, 
press the NPRO key. 
If the Feed-Check light is on, 
open the cover, manually clear 
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| 37 | The punch instruction that led to the 
• — — ' halt was a dummy-punch instruction 
required to move an END or XFR card 
through the punch station. The 
instruction is not re-executed upon 
restart. 
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l 38 | The punch instruction that led to the 

' ' halt was a dummy-punch instruction 

required to move an END or XFR card 
through the punch station. The 
instruction is not re-executed upon 
restart. 

• Remove the hopper deck (s) . 

• Open the cover. 

• Manually clear the feed path. 

• Press the NPRO key to turn off the 
Feed-Check light. 

• Place the cards removed from the 
feed path and originating from the 
primary hopper into stacker 1 and 
the cards (if any) originating from 
the secondary hopper into stacker 
5; check the. stacking sequence. 

• If the secondary hopper is also 
used, remove the last card from 
stacker 5 and place it into the 
secondary hopper. 
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, . , 

Column I Contents I Indication 



3i 



blank 



blank 



read or feed error 



punch error 



j 



read-format error, primary feed 



read-format error, secondary feed 



punch-format error, primary feed 



punch-format error, secondary feed 



punch in EOF card, primary feed 



punch in EOF card, secondary feed 



1 



J 



error occurred during operation in primary 
feed 



error occurred during operation in secondary 
feed 



—\ 



blank 



52 



62 



the hopper of origin and the stacker for the 
card located at the pre-print station or at 
the punch station when the halt occurred 

H 



the hopper of origin and the stacker for the 
card located at the print station when the 
halt occurred 



the hopper of origin and the stacker for the 
last card stacked 



the hopper of origin and the stacker for the 
next-to-last card stacked 



or 2 or 
3 or 4 



number of "run-out" cards to be returned to 
the primary hopper 



10 



or 1 or 
2 or 3 



■+ 



number of "run-out" cards to be returned to 
the secondary hopper 



♦blank = no card located in this position 
12-0-9-n = from primary hopper to stacker n 
12-8-n = from secondary hopper to stacker n 
(n may be any one of the digits 1 through 5) 



1 For output files only (additional 12-punch in column 3): If the Feed-Check light was 
on when halt code 0201 was displayed because a card did not properly register at the 
punch station, punching was suppressed. In this case, check which feed was involved 
and increase by 1 the number of cards to be returned to the corresponding hopper. 

2 Normally, either column 5 or column 6 contains information. If both columns contain 
information, no accurate restart procedures can be guaranteed. 

Figure 49. Format, of the Information Card Punched by the 2560 During Restart 34 
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Remove all cards that follow the 

END or XFE card from stacker 1 and 

place them into the primary hopper 

Duplicate and replace any damaged 

cards. 

Return the hopper deck (s) to the 

hopper (s) . 

Press the Start key of the 2560. 

Press the Start key on the CPU 

console . 



1 39 1 The punch instruction that led to the 

« » halt was a dummy-punch instruction 

required to move an END or XFE card 
through the punch station. The 
instruction is not re-executed upon 
restart. 

• Eemove the hopper deck. 

• Press the NPRO key. 

• Eemove all cards that follow the 
END or XFE card from stacker 1 and 
place them into the hopper. 

• Eeturn the hopper deck to the 
hopper. 

• Press the Start key of the 2520. 

• Press the Start key on the CPU 
console . 



j40| The punch instruction that led to the 
«- — J halt was a dummy-punch instruction 
required to move an END or XFE card 
through the punch station. The 
instruction is not re-executed upon 
restart. 

• Eemove the hopper deck. 

• Open the cover. 

• Manually clear the feed path. 

• Press the NPRO key to turn off the 
Feed-Check light. 

• Place the cards removed from the 
feed path into stacker 1, in the 
proper order. 

• Remove all cards that follow the 
END or XFE card from stacker 1 and 
place them into the hopper. 

• Duplicate and replace any damaged 
cards. 

• Eeturn the hopper deck to the 
hopper. 

• Press the Start key of the 2520. 

• Press the Start key on the CPU 
console. 



| 41 | The punch instruction that led to the 

1 ' halt was a dummy-punch instruction 

required to move an END or XFE card 
through the punch station. The 
instruction is not re-executed upon 
restart. 

• Remove the hopper deck (s) . 

• Press the NPRO key. 



If the primary hopper is also used, 
remove the last 2 cards from stack- 
er 1 and place them into the pri- 
mary hopper. 

Remove all cards that follow the 
END or XFR card from stacker 5 and 
place them into the secondary 
hopper. 

Return the hopper deck (s) to the 
hopper (s) . 

Press the Start key of the 2560. 
Press the Start key on the CPU 
console. 



| 42 | The punch instruction that led to the 

1 ' halt was a dummy-punch instruction 

required to move an END or XFR card 
through the punch station. The 
instruction is not re-executed upon 
restart. 
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Display location 9C, which contains 
the address of the tape drive 
concerned. 

Check whether this drive is 
attached to the I/O channel. If 
the drive is attached, the tape 
control unit is not ready (either 
the power is off, or the unit has 
been switched to off-line CE 
operation) . 

If the drive is not attached, i.e., 
the address displayed is not asso- 
ciated with any of the tape drives 
included in the user's Model 20 
system, the pertinent contents of 
the Basic Monitor in main storage 
are invalid. This can have two 
causes: either the REP cards for 
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the Basic Monitor contained invalid 
addresses, or a problem program 
changed the contents of the Basic 
Monitor area. In any case, the job 
must be discontinued. 
Press the Start key on the CPU con- 
sole to initiate the end-of-job 
routine . 



44 | • Have the hardware analyzed by an 
— j ibk customer engineer . When this 
analysis has been made, the job 
must be discontinued. 
• Press the Start key on the CPU con- 
sole to initiate the end-of-job 
routine. 



| 45 | Display locations AO and A1, which 
1 • contain the address of the CCW con- 
taining the error. 

If the address displayed is that of a 
location within the Basic Monitor 
area, part of the Basic Monitor has 
been destroyed by a problem program. 
In this case, a new system run (start- 
ing with the I PL procedure) must be 
initiated. If the address displayed 
indicates a location within the pro- 
blem program, the job must be discon- 
tinued. Press the Start key on the 
CPU console to initiate the end-of-job 
routine . 



|46| The condition cannot be corrected. If 
1 1 it is desired to further identify the 

halt, the following steps may be 

taken. 

• Display location 9C, which contains 
the address of the tape drive 
concerned . 

• Display locations AO and A1 # which 
contain the address of the CCW. 

• Display the first byte of the CCW, 
which contains the command code. 
If the command code is 04 (sense) , 
no sense data has been stored. If 
the command code is not 04, loca- 
tions DO through D5 (sense data) 
may be displayed. 

Discontinue the job by pressing the 
Start key on the CPU console to initi- 
ate the end-of-job routine. 



| 47 | If the halt follows an operator-choice 

1 ■ halt and the cause of the latter was 

considered a disaster condition, no 
further diagnosing is required. 
Otherwise, perform the following steps 
to identify the cause of the halt. 

• Display location 9C, which contains 
the address of the tape drive 
concerned. 



Display location DO (sense byte 0) . 
If bit 3 (equipment check) , and/or 
bit 5 (overrun) , and/or bit 6 (word 
count zero) of this byte are on, 
the cause of the halt is a hardware 
malfunction. In this case, have 
the hardware analyzed by an IEM 
customer engineer. Otherwise, con- 
tinue with the following step. 
Display locations AO and A1 , which 
contain the address of the CCW. 
Display the command code (1st byte 
of the CCW) . If the command code 
is 27 (backspace block) , 2F (back- 
space file) , or 0C (read backward) , 
display location D1 (sense byte 1) 
and check bit 4 (load-point bit) . 
If this bit is on, the error halt 
was caused by a backspace or read- 
backward operation that led to or 
was attempted at load-point. In 
this case, display location 9D 
(unit status) and inspect bit 5 
(device-end bit) to determine 
whether the operation was attempted 
at load-point or led to load-point 
(on = to load point, off = at load 
point) . 

If the command code is not 27, 2F, 
or 0C, or if the load-point bit is 
off, continue with the following 
step. 

Display location DO (sense byte 0) 
and check bit 4 (data check) . If 
the bit is on, the halt was caused 
by an irrecoverable read error 
(during the execution of a read or 
read-backward command) that could 
not be handled by the problem pro- 
gram. If the bit is off, the tape 
drive or the tape control unit left 
ready status during the execution 
of a command because (1) the power 
dropped, or (2) the reset key of 
the drive was pressed, or (3) an 
operation was not terminated before 
the physical end of the tape was 
reached (read or forward-space- 
block operation into a completely 
erased tape, or forward-space-file 
operation on a tape that does not 
contain a tape mark between the 
starting point of the operation and 
the physical end of the tape) . 
Having identified the cause of the 
halt, discontinue the job by pres- 
sing the Start key on the CPU con- 
sole to initiate the end-of-job 
routine. 



1 48 1 Perform the following steps to 
1 ' identify the cause of the halt. 

• Display location 9C, which contains 
the address of the tape drive 
concerned. 

• Display location DO (sense byte 0) . 
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• Inspect bit 1 {intervention 
required) . If this bit is on, the 
tape drive addressed is not 
attached to the control unit., 

• Display location D1 (sense byte 1) . 

• Inspect bit 7 (not capable) . If 
this bit is on, an attempt has been 
made to read, on a tape drive (one 
of the Models 4 through 6) without 
the NRZI compatibility feature, a 
tape written in the NRZI mode. 

• Display location DO (sense byte 0) . 

• Inspect bit 4 (data check) . If 
this bit is on, a write error has 
occurred . 

• If bits 1 and 4 were found to be 
off, inspect bit 2 (bus-out check). 
If this bit is on, a bus-out check 
(not corrected after 3 repeated 
attempts) has occurred. This is a 
channel hardware failure, which 
should be analyzed by an IBM cus- 
tomer engineer. For further 
identification, location 9D (unit 
status) may be displayed to find 
out whether the error occurred dur- 
ing initial selection or during 
data transfer. 

• If bit 2 of sense byte is also 
off, bit (command reject) must be 
on. Display locations A0 and A1 to 
find the address of the CCW. Dis- 
play the first byte of the CCW, 
which contains the command code. 

If the command code is 01 (write) , 
1F (write tapemark) , or 17 (erase) , 
an attempt has been made to write 
on, or erase, a file-protected tape 
volume. In this case, bit 6 in 
location D1 (file-protected) is 
also on. 

• If the command code is not 01, 1F, 
or 17, an attempt has been made to 
set a tape control unit with 7- 
track compatibility feature to 
"data converter on" although the 
unit does not have the data conver- 
sion feature. 

If the error condition cannot be 
corrected manually, the job must be 
discontinued. Press the Start key on 
the CPU console to initiate the end- 
of-job routine. 

If the condition has been corrected or 
another repetition sequence is 
desired, manually enter into location 
CE (operator-communication byte) any 
non-zero binary value and press the 
Start key on the CPU console to resume 
operation. 

• Display general register 13, which 
contains the displacement of the 
symbolic device address that was 
not assigned or misassigned, coun- 
ted from the beginning of the log- 
ical unit table in the Basic 
Monitor. 
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• Display general register 15, which 
contains the address of the command 
control block. 

• Give this information to the pro- 
grammer to enable him to correct 
the program. 

• Discontinue the job by pressing the 
Start key on the CPU console. This 
initiates the end-of-job routine. 



Display location 9C, which contains 
the address of the tape drive 
concerned. 

Put this drive into ready status. 
Press the Start key on the CPU con- 
sole to continue processing. 



i 1 

| 51 | • Correct the error condition and re- 

« » initiate the system run, beginning 

with the IPL procedure. 



a) The incorrect card was read on a 
2501 or a 2520 card Bead-Punch. 

• Remove the input deck from the 
hopper. 

• Press the NPRC key. 

• Remove the last two cards from 
the stacker and place them in 
front of the input deck. 

• Check the card that is now the 
first card of the input deck 
(i.e., the card that caused the 

error) and correct it if 
necessary. 

• Return the input deck to the 
hopper. 

• Press the Start key of the 
affected unit. 

• Press the Start key on the CPU 
console. 

b) The incorrect card was read on the 
2560 primary feed. 

• Remove the input deck from the 
primary hopper. 

• If the secondary hopper is also 
used, remove the input deck from 
the secondary hopper. 

• Press the NPRC key. 

• Remove the last three cards from 
stacker 1 and place them in 
front of the input deck for the 
primary hopper. 

• Check the card that is now the 
first card of the input deck for 
the primary hopper {i.e., the 
card that caused the error) and 
correct it if necessary. 

• If the secondary hopper is also 
used, remove the last card from 
stacker 5 and place *t into the 
secondary hopper. 

• Eeturn the input deck (s) to the 
hopper (s) . 

• Press the Start key of the 2560. 
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Press the Start key on the CPU 
console. 



c) The incorrect c 
2560 secondary 

• Remove the i 
secondary ho 

• If the prima 
used, remove 
the primary 

• Press the NP 
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stacker 5 an 
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Note: When the program is running 
under control of a card-resident sys- 
tem, the job control statements must 
precede phase 02 of the Job Control 
program deck. 

If the incorrect card is a loader 
card, place the control cards in front 
of phase 02 of the Job Control program 
deck, before returning the input 
deck (s) to the hopper (s) . 

• Remove the hopper deck (s) . 

• Press the NPRO key. 

• Set up the I/O devices for the next 
job. 

• Press the Start keys of all I/O 
devices to be used. 

• Press the Start key on the CPU 
console. 



Both JOB cards are ignored 

• Remove the input deck f 
per of SYSRDR. 

• If SYSRDR refers to the 
secondary feed of a 256 
other feed is also used 
other hopper deck, too. 

• Press the NPRO key. 

• Remove the job control 
during this Job Control 
all cards up to, and in 
first of the two JOB ca 
from the stacker of SYS 
1 for 2560 primary feed 
for 2560 secondary feed 

• Place the JOB card and 



rom the hop- 
primary or 
and the 
, remove the 



cards read 

run (i.e. , 
eluding, the 
rds read) 
RDR (stacker 
, stacker 5 

)• 

all other 



| 55 | If it is desired to discontinue the 
«— • job, 

• prepare the I/O devices for the 
next job and 

• press the Start key on the CPU con- 
sole to initiate the end-of-jct 
routine. 

If it is desired to continue the job, 
take the following steps : 

• Remove the hopper deck from the 
affected device. 

• If the device is the 2560 primary 
or secondary feed and the other 
feed is also used, remove the deck 
from the other hopper. 

• Press the NPRO key of the device. 

• a) If the device is a 2501 and an 

additional input area has not 
been specified in the BPG con- 
trol card (i.e., col. 22 is 
blank) , remove the last two 
cards from the stacker. 

b) If the device is a 2501 and an 
additional input area has been 
specified in the BPG control 
card (i.e., col. 22 contains a 
E) , remove the last three cards 
from the stacker. 

c) If the device is a 2520 Card 
Read-Punch, remove the last two 
cards stacked. 

d) If the device is the 2560 pri- 
mary feed, remove the last three 
cards from stacker 1 . 

e) If the device is the 2560 secon- 
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dary feed, remove the last two 
cards from stacker 5. 

• Place the cards removed from the 
stacker in front of the hopper 
deck, in the proper sequence. 
(Refer to the EPG listing or a list 
prepared by the programmer.) 

• Check the card that is now the last 
card in the appropriate stacker. 

• Use the RPG listing or the list 
prepared by the programmer to 
determine the next .mandatory card 
type that is to follow the last 
card in the appropriate stacker. 

• Check whether the first card of the 
hopper deck is a card of this type. 
If this is not the case, take the 
following steps: 

a) If one or more cards of the 
reguired type follow later in 
the hopper deck, remove the 
card (s) preceding it (or them). 
The removed card(s) cannot be 
processed during the current 
job. 

b) If the reguired card type is 
missing, prepare the specified 
card(s) of this type and insert 
it (or them) into the hopper 
deck, in the proper sequence. 
Remove any cards (s) that precede 
the newly prepared card(s) in 
the hopper deck. The removed 
card (s) cannot be processed dur- 
ing the current job. 

• If the affected device is the 256C 
primary or secondary feed and the 
other feed is also used, remove the 
card (s) ejected by the NPRC from 
the stacker of the other feed and 
place it (or them) in front of the 
corresponding hopper deck. 

• Return the hopper deck (s) to the 
hopper(s) . 

• Press the Start key of the affected 
device. 

• Enter FF into location OOCE. 

• Press the Start key on the CPU con- 
sole to continue processing. 

If it is desired to discontinue the 
job, 

• prepare the I/O devices for the 
next job and 

• press the Start key on the CPU con- 
sole to initiate the end-of-job 
routine. 

If it is desired to continue the job, 
take the following steps: 

• Remove the hopper deck from the 
affected device. 

• If the device is the 2560 primary 
or secondary feed and the other 
feed is also used, remove the deck 
from the other hopper. 

• Press the NPRC key of the device. 

• a) If the device is a 2501 and an 



additional input area has not 
been specified in the BPG con- 
trol card (i.e., col. 22 is 
blank) , remove the last two 
cards from the stacker. 

b) If the device is a 2501 and an 
additional input area has been 
specified in the BPG control 
card (i.e., col. 22 contains a 
E) , remove the last three cards 
from the stacker. 

c) If the device is a 2520 Card 
Read-Punch, remove the last two 
cards stacked. 

d) If the device is the 2560 pri- 
mary feed, remove the last three 
cards from stacker 1. 

e) If the device is the 2560 secon- 
dary feed, remove the last two 
cards from stacker 5. 

• Insert the cards removed from the 
stacker into the hopper deck, in 
the proper sequence by matching 
fields. 

• Check the matching field of the 
last card in the stacker against 
that of the first card of the ' op- 
per deck. If the card of the nop- 
per deck is not in the specified 
sequence with respect to the 
stacked card, remove this card from 
the hopper deck. 

• Repeat the preceding step until the 
first card of the hopper deck is in 
sequence with the last card in the 
stacker. (The removed card (s) can- 
not be processed during the current 
job.) 

• If the affected device is the 2560 
primary or secondary feed and the 
other feed is also used, remove the 
card (s) ejected by the HEEO from 
the stacker of the other feed and 
place it (or them) in front of the 
corresponding hopper deck. 

• Return the hopper deck (s) to the 
hopper (s) . 

• Press the Start key of the affected 
device. 

• Enter FF into location OOCE. 

• Press the Start key on the CPU con- 
sole to continue processing. 

r 1 

1 57 1 • Display register 13, which contains 
' — J the displacement of the affected 
symbolic device address (logical 
unit block) from the beginning of 
the logical unit table, and identi- 
fy the tape drive concerned. 

• Display register 15, which contains 
the address of the corresponding 
DTF block. The DTF block contains 
information which may assist the 
programmer in locating the error 

(e.g., the accumulated block count 
in bytes 30-33, and the residual 
count in bytes 4-5) . The structure 
of the DTF block is described in 
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detail in the SBL publication IBM 
System/360 Model 20, Tape Program- 
ming Sys tem, Input/Output Con trol 
System, Form C24-9003. 

• Display register 13, which contains 
the displacement of the affected 
symbolic device address (logical 
unit block) from the beginning of 
the logical unit table, and identi- 
fy the tape drive concerned. 

Document feeding in the IBK 1419 has 
stopped. One of the following has 
occurred: 



i i 



Bemove the input deck from the 

hopper 

Press the SPEC key 

Eemove the last two cards from the 

stacker and place them in front of 

the input deck. 

Place the USEE routine in front of 

the input deck. 

Beturn the input deck to the hopper 

Press the Start keys on the 

affected units 

Press the Start key on the CPU 

console. 



Sort-Check_I}alt - 1419 Sort-Check 
indicator and Stop-Bestore key are 
illuminated „ 



| 61 | Too many follow-up documents were 
l — j encountered after a disengage instruc- 
tion, because the input buffer became 
full. 



More than one or none of the stack- 
er chute blades have been activated 
for a document passing the selector 
station. Document feeding stops, and 
the remaining documents in the docu- 
ment path are read, stacker selected, 
processed, and printed. The error 
document is directed to the reject 
pocket. 

• Bemove the error document from the 
reject pocket. 

• Follow the installation procedures 
to identify the error document and 
place the error document into the 
correct pocket. 

• Press the 1419 Stop-Bestore key. 

• Press the 1419 Start key. 

• Press the Start key on the CPU 
console. 

Jam .H alt - Left- Peed and/or Eight- 
Feed, and Stop-Bestore key lights 
are on (1419) . Transport light is 
on (1259) . 



Follow the in 
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ments have 

Place the doc 
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the hopper 
Place any 
into the r 

Press the Sto 
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Press the Sta 

Press the Sta 



stallation procedure 

ne which of the docu- 
been read. 

uments that have been 

the correct pockets, 
other documents to 
in the proper order. 

mutilated documents 

eject pocket . 

p-Bestore key on the 

rt key on the 1419. 
rt key on the CPU. 



If it is desired to discontinue the 
job: 

• Enter a hexadecimal value other 
than 'OO' in the communication 
byte (location X'OOCE')- 

• Press the Start key on the CPU 
Console to initiate the end-of- 
job routine. 



Press the Stop key on the Magnetic 

Character Beader. 

Press the Start key on the CPU to 

continue processing. 

If this halt occurs frequently, 

call in an IEK Customer Engineer. 



1 62 1 A 1419 I/O error has occurred. 
L — J Several unread documents may be in the 
reject pocket. 



Stop the 1419. 

Start the CPU and allow the user 
program to print all the documents 
that have been read. 
Beturn all rejected, unread docu- 
ments to the feed hopper. 
Start the 1419 to continue 
processing. 

If the user program specified EBBE- 
XIT in the 1419 file-definition 
statement, the job can be discon- 
tinued using the error exit option. 
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If the program does not continue and 
error code 0501 is displayed again, 
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the job must be discontinued (after 
communicating with the operator of the 
remote terminal) . 



| 64 | Operator choice: 

' ' a) Follow the appropriate procedure as 

indicated for halt code 02D2. 
b) Follow the appropriate procedure as 
indicated for halt code 02D2, but 
enter a value other than CO into 
location CE before pressing the 
Start key on the CPU console. The 
cards will then not be read (i.e., 
checked for "all blanks") before 
they are punched. 



|65| Operator choice: 

L ' a) Follow the appropriate procedure as 

indicated for halt code 02D3. 
b) Follow the appropriate procedure as 
indicated for halt code 02D3, but 
enter a value other than 00 into 
location CE before pressing the 
Start key on the CPU console. The 
cards will then not be read (i.e., 
checked for "all blanks") before 
they are punched. 
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Operator choice: 

a) Follow the appropriate procedure as 
indicated for halt code C2D*J. 

b) Follow the appropriate procedure as 
indicated for halt code C2D4, but 
enter a value other than 00 into 
location CE before pressing the 
Start key on the CPU console. No 
more cards will then be punched 
during the job. 

Operator choice: 

a) Follow the appropriate procedure as 
indicated for halt code 02D5. 

b) Follow the appropriate procedure as 
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indicated for halt code 02E5, but 
enter a value other than CO into 
location CE before pressing the 
Start key on the CPU console. No 
more cards will then be punched 
during the job* 

Operator choice: 

a) Follow the appropriate procedure as 
indicated for halt code 03D4. 

b) Follow the appropriate procedure as 
indicated for halt code 03D4, but 
enter a value other than 00 into 
location CE before pressing the 
Start key on the CPU console. Nc 
more cards will then be punched 
during the jot. 



| 69 | Cperator choice: 



a) 

b) 

c) 



|70 | a) 



b) 
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PRGGRAMMED-HALT DISPLAYS 



01D1 

or 

01 D2 

J- 

0200 



Code 

Displayed 

ESTR 



0100 



0101 



0110 



0111 



011C 



01B0 



Cause 



2501 not ready 



Read error (and possibly additional 
feed check) on 2501 



Read-format error on 2501 
(one I/C area specified) 



Read-format error on 2501 
(two I/O areas specified) 



Card read error during IPL 



2501 not ready 






Read error (and possibly additional 
feed check) on 250 1 



Attention and Feed-Check 

lights off 
Only attention light on 
Feed-Check light on 
+ 



Unit with device address 2 (2560 
MFCM, 2520 card read-punch or 
2520 card punCh) not ready 



Additional Identification 



Attention and Feed-Check 

lights off 
Only attention light on 
Feed-Check light on 



Feed-Check light off 
Feed-Check light on 



Feed-Check light off 



Ref .No 



1 

3 
13 

•+ ! 

4 
14 
1 

28 



Feed-Check light off 



Feed-Check light off 



-+- 



Feed-Check light off 
Feed-Check light on 



Attention and Feed-Check 
(and, if 2560, Hopper- 
check) lights off 
Only attention light on 
Feed-Check light on 
Hopper-Check light on 



+- 



29 



H 



3 

13 

4 

14 



3 

24 

9 



0201 



0202 



Punch error (and possibly additional 
feed check) on 2520 card punch or 
any check on 2560 MFCM 



2520: Feed-Check light off | 6 
2520: Feed-Check light on | 15 
2560: Feed-Check light off | 34 
2560: Feed-Check light on | 35 
,. 



2560 ready for second restart 



0205 

or 
02 06 



-+ 



Punch error (and possibly additional 
feed check) on 2520 card read- 
punch 



Feed- 
Feed- 



Check light off 
■Check light on 



36 



6 
15 



0209 

or 
020A 



Read error (and possibly additional 
feed check) on 2520 card read- 
punch 



020D 

or 
020E 



Read error and punch error (and 
possibly additional feed check) on 
2520 card read-punch 



Feed-Check light off 
Feed-Check light on 

Feed-Check light off 
Feed-Check light on 



-+ 



4 
14 



6 
15 



0211 

or 
0212 



Feed check prevents read operation 
on 2520 card read-punch 



0220 



Feed-check on 2520 card punch 



Feed-Check light on 






IFeed-Check light on 



16 



17 | 
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02 21 

or 

0222 

0231 

or 
0232 



0235 

or 
0236 

0241 

or 

0242 

j. 

0281 

or 
0282 



Code 

Displayed 

ESTR 



0285 

or 
0286 



2B2 



Punch error and additional read- 
format error on 2520 card read- 
punch 
+ 



02B3 



02B4 



02B5 



02C1 



02C5 



02C7 



Cause 



Feed-check prevents punch operation 
on 2520 card read-punch 



Feed check occurred during punch 
operation on 2520 card read-punch 



No card in pre-read station 

(hopper-check) 
Card in pre-read station 

Feed-Check light on 



Punch error prevents read operation 
on 2520 card read-punch 



Punch-format error on 2520 card 
read-punch 



Read-format error on 2520 card 
read-punch 



Feed-Check light off 



-+ 



Read error and/or feed check 
on 2560 primary feed or 
2520 card read-punch 



Read error and/or feed 
check on 256C secondary feed 



Punch error and/or feed check 
on 2560 primary feed or 
2520 card read-punch 
or 2520 card punch 



Punch error and/or feed check 
on 2560 secondary feed 



Feed check prevents read or punch 
operation on 2520 card read-punch 
or card punch 



02C3 IFeed check prevents read operation 
on 2520 card read-punch 



Read error and/or feed check on 
2520 card read-punch 



Punch error and/or read error and/ 
or feed check on 2520 card read- 
punch or 2520 card punch 



02E0 |Unit with device address 2 (2560, 
2520 card read-punch or 2520 card 
punch) not ready 



Additional Identification 



Feed-Check light off 



Feed-Check light off 



Feed-Check light off 
Feed-Check light on 



Feed-Check light off 
Feed-Check light on 



Feed-Check light off 
Feed-Check light on 



Feed-Check light off 
Feed-Check light on 



Feed-Check light off 
Feed-Check light on 



Feed-Check light on 



Feed-Check light on 



Feed-Check light off 
Feed-Check light on 



28 



4 

28 



-+ 



Feed-Check light off 
Feed-Check light on 






Attention and Feed-Check 
(and, if 2560, Hopper- 
check) lights off 
Only Attention light on 
Feed-Check light on 
Hopper-Check light on 



Ref .No. 

9 
17 
1 



30 
31 



70 
64 



70 
65 



70 
66 



70 
67 



17 



-H 



17 

-+ 1 

4 
14 



6 
15 



3 

24 

9 
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Code 
Displayed 
ESTR 
I 

02D2 



02 D3 



02D4 



02E5 



02E6 



02 D7 



02D8 






02C9 



02DA 



02DB 
02DC 



02DD 






0300 



0301 



0320 



Cause 



Read and/or feed check on 2560 
primary feed or 2520 card read- 
punch 



Read error and/or feed check on 
2560 secondary feed 



-+- 



Punch error and/or feed check en 
2560 primary feed or 2520 card 
read-punch or 2520 card punch 



Feed- 
Feed 

+ 

2560 
2560 
2520 
252 



Punch error and/cr feed check on 
2560 secondary feed 



2560 primary feed or 2520 card 
read-punch or 2520 card punch 
not ready 



-+ 



2560 secondary feed not ready 



No blank card found for punching 
on 2560 primary feed or 2520 
card read-punch 



No blank card found for punching 
on 2560 secondary feed 



— +■ 






Feed check on 2560 primary 
feed or 2520 card read-punch 



Feed check on 2560 secondary feed 






Punch and/or feed check on 
2560 primary feed or 2520 
card read-punch 



Punch and/or feed check on 
2560 secondary feed 






1442 not ready 



Punch error and/or feed 
check on 1442 



+ . 



Additional Identification 



2560: Feed-Check light off 

2560: Feed-Check light on 

2520: Feed-Check light off 

2520: Feed-Check light on 



■Check light off 

■Check light on 

Feed-Check light off 

: Feed-Check light on 

Feed-Check light off 

Feed-Check light on 



Feed-Check light off 
Feed-Check light on 



Attention and Feed-Check 
lights off (and, if 2560, 
Hopper-Check light off) 

Only attention light on 

Feed-Check light on 

Hcpper-Check light on 



Attention, Feed-Check and 
Hopper-Check lights off 
Only attention light on 
Feed-Check light on 
Hopper-Check light on 



2560: Feed-Check light en 
2520: Feed-Check light on 

Feed-Check light on 



256C: Feed-Check light off 

2560: Feed-Check light on 

2520: Feed check light off 

2520: Feed-Check light on 



Feed-Check light off 
Feed-Check light on 



Attention and Check lights off 
Only attention light on 
Feed-Check light on 



Feed check on 1442 



Feed-Check light off 
Feed-Check light on 
_ + 

IFeed-Check light on 



R 


ef .No. 




7 




19 




4 




14 



— -\ 



20 



-H 



11 
22 
10 
21 



12 

23 



3 

24 

9 



-H 



1 

3 
25 
9 
4 H 

32 



33 



-H 



22 

21 



23 

37 
38 

39 
40 



-H 



41 
42 



1 

3 

17 

6 
15 



—I 



17 
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Code | Cause 
Displayed | 
ESTR | 

03B4 | Punch error and/or feed check on 
| 1442 



03D4 | Punch error and/or feed check on 
I 1442 



03D6 | 1142 not ready 



-+- 



0400 |Printer not ready 
j. 



1 

0401 |Print error 

04B1 | Print error (with reprint) 



Additional Identification 



t J 

Ref .No. 



68 



Feed-Check light off 
Feed-Check light on 



Attention and Feed-Check 

lights cff 
Only Attention light en 
Feed-Check light on 



+— 






10 
21 

1 



3 

24 

4 ., 

26 
27 
I 69 
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Code 

ESTR 



05C1 



0581 



0582 



0583 



0584 



0585 



0586 



0587 



+ 



0588 

058A 



058B 
058C 
058D 



058E 



0590 



0593 



0595 



Cause 



Condition code = 3; XIC instruction rejected 
(BSCA) 



H~ 



OPEN macro not issued or another initial 
macro issued before transmission is finished 
(BSCA) 



A non-initial macro has been issued without 
the preceding initial macro or (in CCNFIG= 
SW) connection not established (BSCA) 



Condition code = 1 after an execution try 
(in C0NF'IG=SW) or condition code = 3 and 
sense byte not set to X'lC 1 (BSCA) 



Two WRITE RVI macros issued immediately 
after each other or two RVI sequences 
received in succession (BSCA) 



Previous macro not completed (BSCA) 



A WRITE has been issued immediately after 
a READ receiving a message which did not 
end with ETX (M0DE=TAT only) (BSCA) 



A WRITE has been issued immediately after a 
WRITE which resulted in a message response 
(MODE = TAT only) (BSCA) 



Invalid third operand in macro (BSCA) 



Number of leading graphic characters greater 
than 7 or (in C0NFIG=SW only) the number of 
ID characters is greater than 15 



Not enough space in CIOAREA for the expected 
message (BSCA) 



Erroneous or missing start-of-message se- 
quence in outgoing message (BSCA) 



Erroneous or missing end-of-message sequence 
in outgoing message or given message length 
does not correspond to real message length 
(BSCA) 



The user-defined CIOAREA is equal to or 
less than bytes or exceeds 4095 bytes 
(BSCA) 



Variable-length records, transparency, and 
ITE used concurrently (BSCA) 



ABORT requested issued when another ABORT 
request has already teen cataloged (BSCA) 



The byte count for the telephone number 
to be used by AUTOCALL is C (BSCA) 



Restart 



Ref .No. 



Follow procedure 
63 



63 



Press START on 
CPU to discon- 
tinue the job 



53 
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Code 

Displayed 

ESTR 

j. 

0600 



0601 



0602 



06C3 



Cause 



Additional Identification 



1419 or 1259 Magnetic Character 
Reader not ready 



A GET for the Magnetic Character 
Reader, or a PUT for the printer, 
has been issued without a prior 

OPEN. 



Jam or sort check in the 1419 or 
1259 



Buffer overrun for the 1419 or 
1259 



I— 



— +- 



| 0604 | 1419 I/C error 

i i 



Restart: Press the start keys 
on the 1419 or 1259 and on 
the CEO 



Press start on the CEU to 
discontinue the job. 




Ref .No. 



1 



+ 1 



59 



Code 

Display 

ESTR 

0701 



ed 



-+ 



0702 



0703 



Cause 



43 



Device not operational. 

(I/O operation requested on a tape drive not attached to I/O 
channel) 



Hardware malfunction. 

Tape I/O operation resulted in interface control check or 
channel data check. The checks are caused by a channel or 
control unit malfunction, which should net occur during normal 
operation. An interface control check can occur at the time 
an XIO instruction is executed or at interrupt time. A chan- 
nel data check can occur only during the execution of an XIO 
instruction. In both cases, the XIC instruction may have been 
issued as a result of a request for I/O either in the problem 
program or within the error recovery routine in the Easic 
Monitor. 



Channel programming error. 

The physical tape I/O and error routines attempted to execute 
an invalid command or command chain. The corresponding XIC 
instruction may have been issued as a result of a request for 
I/O either in the problem program or in the error recovery 
routine. 

The halt is caused by one of the following conditions: 
a) The device address in the specified physical unit block is 
zero; 

the command code in the CCW has four low-order zero bits; 
the length count of a read, read-backward, write, or sense 
command is zero ; 

the CCW contains an invalid data address (protected area 
or outside available storage) , or the data address becomes 
invalid at a point during the execution of a read, read- 
backward, write, or sense command (i.e., while data is 
being transferred) ;; 

the command chain begins with a transf er-in-channel com- 
mand or has two successive transf er-in-channel commands. 



b) 
c) 

d) 



e) 



Ref. No. 



H 



44 



45 
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Code 

Displayed 
ESTR 



704 



0705 



0706 



0707 



0708 



0710 



0711 



Cause 



Error within corrective action. 

A unit-check condition occurred when an attempt was made in 
the error recovery routine to execute a sense command or a 
space-block command. 



Disaster condition. 

During execution of the tape error recovery routine, one of 

the following non-ccrrectable conditions has fceen encountered: 

a) A data error that occurred during the execution of a read 
or read-backward command has not teen corrected after 99 
repeated attempts (including S tape-cleaning sequences) , 
and the problem program does not provide for handling a 
read error. 

b) The execution of a read-backward, backspace-block, or 
backspace-file command led to load point or was attempted 
at load point. 

c) Curing execution of a command, the tape device concerned 
or the tape control unit left ready status {power dropped, 
or the Reset key was pressed, or the tape ran off the 
left-hand reel) . 

d) An equipment-check, overrun, cr wcrd-count-zero condition 
occurred. 

e) An operator-choice condition had ccurred before this dis- 
aster halt, and the operator had considered it a disaster 
condition. 



Operator-choice condition. 
Curing execution of the tape error recovery routine, a condi- 
tion occurred that requires an operator decision. This condi- 
tion is one of the following: 

a) A write error in a write or write-tapemark operation has 
not been corrected after 3 repeated attempts. 

b) The tape drive addressed is not attached to the tape con- 
trol unit. 

c) A write, write-tapemark, or erase operation has been 
attempted on a file-protected tape volume. 

d) An attempt has been made to set a tape control unit with 
7-track compatilility feature tc "data converter on" 
although the unit does not have the data conversion 
feature. 

e) A bus-out-check condition has not been corrected after 3 
repeated attempts. 

f) An attempt has been made, on a tape drive (one of the 
Models 4 through 6) without the NEZI compatibility fea- 
ture, to read a tape written in the NRZI mode. 



Symbolic device address not assigned cr net 
assigned to a tape drive. 



Cevice not ready. 

I/O operation requested on a tape drive that is not ready 



Tape drive on which the system tape is mounted is not opera- 
tional during tape IFL. 



Tape read error during tape IEL. Fress START en the CPU to 
re-execute IPL. If the error occurs repeatedly, create a new 
system tape. 



Ref.No, 



46 



47 



-H 



-H 



48 



49 



— ^ 



H 



51 
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Code 

ESTR 






0B01 

f 

0B02 

j. 

0B03 



Control statement other than ASSGN 
follows IPL. 

ASSGN statement following IPL is not 
for SYSRDR. 

Incorrect 'cuu' specification in ASSGN 
statement. 



0E04 

^ 

0BT1 



0B12 

j. 

0E13 

I- 

0B14 



0B15 



Incorrect ' dd 1 specification in ASSGN 
statement. 

IPL is not followed by a control 
statement. 

Tape IPL is followed by a control 
statement other than ASSGN. 

1st operand or separator (,) of ASSGN 
statement is incorrect. 



2nd operand or separator (,) of ASSGN 
statement is incorrect. 

3rd operand or separator (,) or 
delimiter (blank) of ASSGN statement 
is incorrect. 



H- 



0B16 



0B17 



0B1 8 



0B19 



0B1A 

0B20 

j. 

0B30 



Cause 



Restart 






— I 



4th operand or delimiter (blank) of 
ASSGN statement is incorrect. 



-H 






Tape drive for system tape is 7-track or 
not ready, or not file-protected. The 
mounted reel either is not the system 
tape or it contains records of wrong 
length. 



Easic Monitor does not contain unit 
number specified in ASSGN statement. 



End-of-file card missing, or cards ether 
than ASSGN SYSRDR or REP cards between 
ASSGN SYSRES card and end-of-file card. 

Unit number in REP card is zero. 



End-of-job halt. 






Phase not found. Name of phase to be 
loaded next is not in cere-image 
directory. (Error in JCE statement or 
error in FETCH macro instruction of 
problem program.) 






Repeat the IPL procedure using 
the correct control statement. 



Correct the error condition and 
repeat the IPL procedure. 



Repeat the IPL procedure using 
a set of correct REP cards. 

Repeat the IPL procedure using 
the required cards in the 
correct sequence. 



Correct the BEP card (s) and 
repeat the IPL procedure. 



Prepare the next jofc(s). Press 
START on CPU. 



If error in JCE statement, 
correct and re-insert JOB card, 
then press START on CEU to 
continue processing. 
If error in IETCH macro in- 
struction, discontinue the job. 
Jcte^ This halt may also occur 
after an error halt in the 
Assembler, CMAINT, MMAINT, or 
DSERV program. In this case, a 
new IPL procedure is required. 
j _. 



Ref .No. 



-H 



-+ 1 



52 



Programmed-Halt Displays and Restart Procedures 133 



OB 31 

j. 

0B3A 



Code 
ESTB 



0B3B 



Load address on the TXT card when 
the LOADEB function is specified 
is lower than: 
2000 for non-overlap mode and tape 

input OB 
2100 for non-overlap mode and card 

input OB 
2400 for overlap mode and tape 

input OB 
2500 for overlap mode and card 

input. 



0E40 



0B 41 



I— 



0E42 



0B43 



0E44 

f 

0B45 



0B46 



0B47 



0B48 



0B49 



Cause 



Hardware malfunction or system tape 
raispositioned. 



Load address for the program on 
the system tape to he loaded is 
too low for execution in overlap 
mode (lower than 2100) 



Change control cards — either 
insert correct address or 
remove the overlap specifica- 
tion. Assembly must be per- 
formed again. 



PAUSE statement has been encountered, 



1st operand or separator (,) or 
delimiter (blank) of control 
statement is incorrect. 

2nd operand or separator (,) or 
delimiter (blank) of control 
statement is incorrect. 



Set up jot (s) as described, 
Press STABT to resume 
cperation. 






3rd operand or separator (,) or 
delimiter (blank) of control 
statement is incorrect. 



4th operand or delimiter (blank) of 
control statement is incorrect. 



Tape unit number specified in ASSGN 
statement is not in Basic Monitor. 
+ 



JOB statement is missing. 



Two successive JOB statements have been 
encountered, i.e., no EXEC statement 
has teen encountered between two JOB 
statements . 

The card just read did not contain a 
control statement. 



Control statement contains invalid 
operation code, or TPLAB statement 
is not preceded by VOL statement. 



Eestart 



Ee-initiate the system run 
(IPL) . 



Press STABT on the CPU 
console to discontinue 
the job. 



Bef.No. 
+ 1 



+ 1 



1 



+ 1 

52 



follow procedure 52, but place 
a JOE card in the hopper of 
SYSBDB before returning the 
input deck. 



52 



54 



52 



-j. i 
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Code 

ESTR 



0E4A 



b + 

0B4B 



1 

OBUC 



-+■ 



0B4D 



0B4E 



0B4F 



0B64 



0E7A 

b 

0B7B 



b 

0B7C 



H- 



0B7D 



Cause 



Restart 



DATE statement is missing. 



| An EXEC statement has been 
| encountered. Follow procedure 
| 52, but place a DATE card in 
| the hopper of SYSBEF before 
|returning the input deck. 



TPLAB statement is missing or not 
in the correct place. 



| Discontinue the job. 
I 



+- 



TPLAB statement is incorrect. 



Label-information area in main 
storage is full. (CONFG card incorrect 
or too many TPLAB statements for the 
available storage capacity.) Or: a CONF 
card is read in after the processing of 
at least one 1PLAB statement. 



| Discontinue the job. 
| Discontinue the job. 



53 



53 



SYSIPT has not been assigned a tape 
drive, or convert feature is off 
(ignored when SYSIPT is assigned to 
a tape drive) 






On SYSIPT, a tape mark has been 
encountered where not expected, or a 
record of incorrect length has been 
read. 



Device assigned as SYSRDR is not 
attached 



| Insert a correct ASSGN card for 
| SYSIPT and an EXEC LCflDEE card 
| in the hopper of SYSRDR and 
| continue processing. 

| Discontinue the jot. 



Repeat the IPL procedure using 
| the prefer ASSGN statement for 
ISYSRDR 






Overlap has been specified for a | Pr 

machine without the overlap feature | to 

+— 



ess START on the CFU console 
discontinue the job. 



A system program has been specified tc 
run in the overlap mode 



|Cp 
I a) 



h) 



eratcr choice: 
Press START on the CPU 
console to continue in non- 
overlap mode. 
Enter FF into location CE 
and press START on the CPU 
console to discontinue the 
job. 



Error statistics were requested but are 
not allowed with this job. 



Error statistics about the preceding 
job are requested, but a LOG control 
statement is missing. 



Press the Start ke 
console to enable 
execution of the j 
statistics will no 
initiated. 



y on the CPU 
normal 
ob. Error 
t be 



When er 
require 
on the 
the job 
When er 
require 
into lo 
printin 
statist 
Start k 
to cont 
(Check 
on the 



ror statist 
d, press th 
CPU console 

ror statist 
d enter hex 
cation OOCE 
g of the er 
ics. Then p 
ey on the C 
inue the jo 
if appropri 
SYSLOG prin 



ics are not 
e Start key 
to continue 

ics are 
adecimal FI 

to permit 
ror 

ress the 
PU console 
b. 

ate paper is 
ter) . 



Ref .No. 



52 



53 



52 



53 



— 1 



53 



— 1 
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Code 

ESTE 

OBFO 



0BF2 



f 

0BF4 



~+- 



0BF5 



0BF6 



0BF7 



OBFF 



OC01 



t 

0C02 



0C03 



Cause 



Bootstrap card has been loaded. 



Distribution- Package Retrieval program 
has been loaded. 



A 9-track distribution tape is mounted 
on a 7-track tape diive; or the tape 
drive addressed in step 10 of the 
Distribution- Package Retrieval program 
is not ready or not attached to the 
system; or the tape reel mounted on this 
drive does not contain the distribution 
tape . 



Tape characteristics specification 
incorrect, or the same tape drive 
specified for input and output tap 



es. 



End-of-reel condition on output tape. 

has 



-+■ 



Next element on distribution tape 
been announced by the printer. 



Last element stored on the Distribution 
tape has been retrieved. 



END s 
(last 
SYSRD 
in co 
speci 
a con 
or EN 
Print 
messa 

The n 
heade 
progr 
neces 
selec 



tatement incorrect or missing 
-card condition was detected on 
R, or a card with a 12-2-9 punch 
lumn 1 was read) , or format 
fications were not followed, or 
trol statement other than DM, FS, 
D (or H1 or H2 for the Tape-to- 
er program) was read. (An error 
ge is printed.) 



Incor 
modif 
state 
or AS 
missi 
suffi 
areas 



umber of field-selects (and 

r statements for Tape-to-Printer 

am) or field-select coding 

sary to perform the requested field 

tion exceeds storage capacity. 

red: specification in utility- 
ier statement, field-select 
ment, or job control statement; 
SGN„ VOL, and/or TPLAB statements 
ng; or storage capacity not 
cient to assign specified I/C 



Restart 



Ref .No. 



Continue with step 9 of the 
operating procedure for the 
Distribution-Eackage Retrieval 
program. 



Continue with step 15 of the 
operating procedure for the 
Distribution-Package Retrieval 

program. 



Terminate program execution 
and start from the beginning. 



Bepeat fiom step 1 9 1 of the 
operating procedure for the 
Distribution-Package Retrieval 
program. 



Repeat the job from the begin- 
ning, using a longer tape. 



Continue with step 22 of the 
operating procedure for the 
Eistribution-Package Retrieval 
program. 



-H 






Discontinue the job 



53 
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Code 

ESTR 



0C1A 



0C24 



0C25 






0C2F 



0C31 



0C32 



0C33 



Cause 



Data loss or overlay (warning) . 



-+ 



Input block on current volume was read 
with an irrecoverable data error. 



Input block on the current volume 
either exceeds the specified input 
block size, or — for fixed-length 
records — is not a multiple of the 
input record length. There is no 
data error. 



A combination of the conditions that 
cause halts 0C24 and 0C25. 



The available storage capacity is 
too small for processing multi-volume 
output files. 



Improper data entered in location CE 



Additional input is expected. 



Tape mark read instead of standard 
volume label on input tape when 
standard labels have been specified, 



+— 



First record on input tape is not a 
standard volume label when standard 
labels have been specified. 



Restart 



Operator choice: 

a) Press STABT on CPU to 
continue processing. 
Enter II into location CI 
and press START on CPU to 
discontinue the jot. 



t) 



Press START on CPD to bypass 
block and continue proces- 
sing. 



Operator choi 

a) Press STAR 
continue p 

b) Enter IF i 
and press 
discontinu 



Enter correct 
START on CPU 
processing. 

Operator choi 

a) Mount new 
START on C 
processing 

b) Enter FF i 
and press 
continue p 
EOF ccndit 

Operator choi 

a) Eount corr 
START on C 
processing 

b) Enter FF i 
and press 
continue t 



ce : 

T on CPU to 

r,ocessing. 

nto location CE 

STABT on CEU to 

e the job. 

data and press 
to continue 



Operator choi 

a) Mount corr 
S1AET on C 
processing 

b) Enter OF i 
and press 
continue p 

c) Enter FF i 
and press 
discontinu 



ce: 

reel and press 

PU to continue 

nto location CE 
START on CPU to 
rocessing with 
ion. 

ce: 

ect reel and press 

PU to continue 

nto location CE 
STABT to dis- 
he job. 

ce: 

ect reel and press 

PU to continue 

nto location CE 
START on CPU to 
rocessing. 
nto location CE 
START on CPU to 
e the job. 



Ref .No. 



53 



-H 



53 



53 



53 
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Code 
ESTR 
j. 

0C34 



l~ 



Volume serial number in standard volume 
label on input tape does not correspond 
to file serial number in TPLAB control 
statement. 



0C35 



0C36 



0C37 



0C38 



j. 



0C39 



0C3A 



0C3C 



0C3D 



0C3E 



f 

0C3F 



0C51 



Cause 



Eestart 






Tape mark encountered before reading 
standard header label on input tape, 
or end-of-data sensed on multi-file 
input tape (tape mispositioned) . 



Standard header label not found on 
input tape when standard labels have 
been specified. 



File identification and/or file seria 
number in standard header label of in 
tape do not correspond to information 
TFLAB control statement. 



Volume se 
header la 
informati 

Inf ormati 
cation, f 
sequence 
label doe 
in TPLAE 



quence number in standard 
bel does not correspond to 
on in TFLAB control statemen 



1 

put 
in 

-\ 

t. 



on other than file identifi- 
ile serial number, and volume 
number in standard header 
s not correspond to informat: 
control statement. 



Illegal user header label read on 
an input tape . 



Tape mark encountered before reading 
standard trailer label on input tape 



Standard trailer label not found en 
input tape when standard labels have 
been specified. 



Block count in standard trailer 
label does not equal number of blocks 
read from an input tape. 



Illegal user trailer label read on 
an input tape. 
■+— 



Additional output tape required. 



Bef .No. 



Operator choice: 

a) Press START on CPU to 
continue processing. (User 
labels are processed.) 

b) Kount correct reel, enter 
OF into location CE, and 
press STAET on CPU to 
continue processing. 

c) Enter FF into location CE 
and press STABT on CPU to 
discontinue the job. 



53 



Operator choice: 

a) Mount correct reel and presj 
START on CPU to continue 
processing. 

b) Enter OF into location CE 
and press STABT on CEU to 
continue processing. 

c) Enter FF into location CE 
and press START on CPU to 
discontinue the jot. 



53 



-H 



Operator choice: 

a) Press STABT on CPU to 
continue processing. 

b) Kcunt correct reel, enter 
OF into location CE, and 
press START on CPU to 
continue processing. 

c) Enter FF into location CE 
and press STAET on CPU to 
discontinue the jot. 



53 



Operator choice: 

a) Press STAET on CPU to 
continue processing with 
EOF condition. 

b) Kount new reel, enter OF 
into location CE, and press 
S1AET on CPU to continue 
processing. 

c) Enter IF into location CE 
and press START on CPU to 
discontinue the jot. 



53 



—4- 



Operator choice: 

a) Press STAET on CPU to 
continue processing. 

b) Enter FF into location CE 
and press STAET on CPU to 
discontinue the job. 



53 






Kount new reel and press STAET 
en CPU to continue processing. 
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Code 
ESTR 



0C52 



0C53 



0C54 



0C57 



0C5B 
0CD1 



0CD8 



0CB9 



OCDA 



OCDB 



OCDC 



OCDD 



OCDE 



OCDF 



Cause 



Tape mark read instead of standard 
volume label on output tape when 
standard labels have been specified, 
or multi-file volume was positioned 
incorrectly by use of a FILES 
statement. 



First record of output tape is not a 
standard volume label when standard 
labels have been specified. 



Op 
a) 



t) 



+— 

Op 
a) 



Volume Serial number in standard 
volume label on output tape does not 
correspond to file serial number in 
TPLAB control statement. 



File identification and/or file serial 
number in standard trailer label on 
output tape do not correspond to 
information in TPLAB control statement 



Output tape has not expired. 



j 



A new pass is about to start. 



0CD7 



An OPTN TES statement was encountered 
for the Initialize Tape Utility program. 

+- 



No VOLx cards found after INITTP 






An operand detected more than once en 
an INITTP control statement. 



First control statement read is net 
INITTP, or is INITTP but contains 
invalid operand (s) . 

SYS000 not assigned. 



Utility-modifier statement does not 
contain SERIAL when the CARD option 
is not specified. 



-H 



The beginning serial number or the code 
was not indicated or incorrect in the 
utility-modifier statement with the 
CARD option not specified. 

CODE has not been entered with the 
CARD option not specified. 



A card that did not contain a VOLx 
or END statement has been read. 



Restart 



b) 



c) 



erator choice: 
Kcunt correct reel and pres 
S1ART on CPU to continue 
processing. 

Enter IF into location CE 
and press START on CPU to 
discontinue the jot. 

erator choice: 
Mount correct reel and pres 
START on CPU to continue 
processing. 

Enter OF into location CE 
and press START on CPU to 
continue processing. 
Enter FF into location CE 
and press START on CPU to 
discontinue the job. 



Ref .No. 

-+ 1 

s 



-+■ 
s 



Op 

a) 
b) 



c) 



erator choice: 
Press START on CPU to 
continue processing. 
Mount correct reel, enter 
OF into location CE, and 
press START on CPU to 
continue processing. 
Enter FF into location CE 
and press START on CPU to 
discontinue the job. 



Press START on CPU to continue 
processing. 



Press START on CPU to discon- 
tinue the job. 



Press START on CPU to discon- 
tinue the job. 



53 



53 



53 



+ , 



53 
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0D01 



t 

0D02 



inp 
tain 

inp 
out 




h 

ODOF 



Code 
ESTH 



J- 

0D10 



-+— 



0D11 



0D12 



f 

0D13 



01)1 4 



0D21 
0D22 
0D23 
01)27 



0D30 



Cause 



ut data file read on the 25C1 
s a record which, according to 
ut specifications, is incorrect 
of sequence. 



ut data file read on the 256C 
feed contains a record which, 
ng to the input specifications, 
rrect or out of sequence. 



ut data file read on the 256C 
ry feed contains a record which, 
ng to the input specifications, 
rrect or out of sequence. 



— 1 



input data file read on a 2415 tape 
ve contains a record which, according 
the input specifications, is 
orrect or out of sequence. 



User-programmed halt provided by means 
of halt indicator H2. 



Input of tables is completed. 



Data processing is completed and 
output of tables is to follow . 



The number of table records read from a 
card reading device is lower than the 
number specified in the source program. 
+— 



The number of table records read from 
a tape drive is lower than the number 
specified in the source program. 



A reflective marker has been encountered 
while a table is being written on tape. 



2501 

2560,2520 
1442 
2415 



End-of-file condition 
occurred, but one or more 
records required according 
to sequence specifications 
have not been read. 



Error statistics are not specified in 
column 35 of the RPG control card, but 
an OPTN TES card is present. 



Restart 



Operator choice: 

a) Press START on CPU to 
discontinue the jot. 

t) Enter IF into location CE 
and press START on CPU to 
continue processing 



Operator choice: 

a) Press START on CPU to 
continue the jot. 
Enter IF into location CE 
and press START on CPU to 
discontinue the job. 



1) 



Press STSET on CPU to 
continue processing. 



Press START on CPU to 
discontinue the job. 



Ref .No. 

1 

55 



-I 

57 



Operator choice: 

a) Press START on CPU to 
discontinue the job. 

b) Enter FF into location CE 
and press START on CPU to 
continue processing with 
end-of-file condition. 

c) For stop no. 0E21, 0E22, 
0E23, continuation of the 
job is possible as indicated 
under Restart 55, provided a 
value other than IF or 00 is 
entered into location CE. 



Press START on CPU to 
discontinue the job. 



— ^ 



— H 



53 






53 



53 



53 



-I 

53 
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Code 

ESTR 



ODFO 



0DF1 



0DF2 



0DF3 



j. 

0EF7 



The matching field specified in the 
input specifications is out of sequence 
in the input file read en the 2560 
secondary feed when two or three input 
files are being read. 



ODFF 



0E02 



+ 



Cause 



User-programmed halt provided by means 
of halt indicator H1 



The matching field specified in the 
input specifications is out of sequence 
in the input file read on the 2501 when 
two or three input files are being read 



The matching field specified in the 
input specifications is out of sequence 
in the input file read on the 2560 
primary feed when two or three input 
files are being read. 






The matching field specified in the 
input specifications is out of sequence 
in the input file read en a 2415 tape 
drive when two or three input files are 
being read. 



Oser-programmed halt provided by means 
of halt indicators H1 and H2. 



0E01 IBecord of incorrect length has been 
read, and neither WLRERR=name nor 
EBBOPT=parameter is specified in the 
pertinent DTFMT statement. 



Elock count in standard trailer label 
does not equal the number of blocks 
read from an input tape. 



0E03 | End-of-volume condition on input or 
output file, and no alternate drive 
specified. 



Restart 



+ 



Operator choice: 

a) Press STAET on CPU to 
continue the jot. 

b) Enter FF into location CE 
and press START to 
discontinue the job 



56 



Operator choice: 

a) Press START on CPU to 
discontinue the jot. 

b) Enter FF into location CE 
and press START on CPU to 
continue processing. 



Operator choice: 

a) Press START on CPU to 
continue the jot. 

t) Enter IF into location CE 
and press STAET on CPU to 
discontinue processing. 



Press STSRT on CPU to 
discontinue the jot. 



Operator choice: 

a) Press START on CPU to 
discontinue the jot. 

b) Enter FF into location CE 
and press STAET on CEU to 
continue processing. 



Operator choice: 

a) Press START on CPU to 
discontinue the jot. 

b) Mount new reel, enter FF 
into location CE, and press 
START on CPU to continue 
processing. 



Ref .No. 



57 

53 



1 



57 

53 



57 
53 



-j 

57 
53 
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Code 
ESTR 



0E04 



0E05 



0E06 



0E07 



0E0 8 



0E09 



OEOA 



OEOB 



OEOC 



OEOD 



OEOE 



Cause 



During read-backward, an end-of-file 
condition has been reached but no 
header label is encountered although 
standard labels have been specified. 



Information o 
number, file 
volume sequen 
header label 
information i 



File serial n 
label does no 
information i 



ther than the file serial 
sequence number, or 
ce number in the standard 
does not correspond to 
n TPLAB statement. 

umber in standard header 
t correspond to 
n TPLAB statement. 



+ 



Volume sequen 
header label 
information i 
updated volum 
multi-volume 



ce number in standard 
does not correspond to 
n TPLAB statement or 
e sequence number of 
file, respectively. 



Standard-labeled input file is to be 
read on a multi-file reel, and the 
reel is positioned beyond the 
desired file. 



No volume label read on input tape 
although standard labels have been 
specified. 



No volume label read on output tape 
although standard labels have been 
specified. 



No standard header label read on input 
tape although standard labels have 
been specified, or the specified file 
is not contained in a multi-file volume, 
In the latter case, a restart is not 
possible. 



Output tape is not at load point when 
standard labels have been specified, and 
no preceding standard trailer label is 
found . 



First record is not a tape mark when 
read-backward is specified. 



Standard trailer label does not 
correspond to information in TPLAB 
statement when read-backward is 
specified.. 



Hestart 



Operator choice: 

a) Press START on CPD to 
discontinue the job. 

b) Enter IF into location CE 
and press START on CPU to 
continue processing. 
(0E04: label processing is 
bypassed. 0E05: user labels 
can be processed.) 



Operator choice: 

a) Press START on CPU to 
discontinue the job. 

b) Mount correct reel, enter IF 
into location CE, and press 
START on CPU to continue 
processing. 



Operator choice: 

a) Press STAET on CPU to 
discontinue the job. 

b) Manually position the tape, 
enter FF into location CE, 
and press START on CPU to 
continue processing. 



Operator choice: 

a) Press START on CPU to 
discontinue the job. 

b) Enter FF into location CE 
and press START on CEU to 
continue processing. (Header 
labels are processed.) 

Operator choice: 

a) Press START on CPU to 
discontinue the job. 

b) Mount correct reel, enter FF 
into location CE, and press 
START on CPU to continue 
processing. 



Operator choice: 

a) Press START on CPU to 
discontinue the job. 

b) Enter FF into location CE 
and press START on CPU to 
continue processing. 



Press START on CPU to 
discontinue the job. 



Operator choice: 

a) Press START on CPU to 
discontinue the job. 

b) Enter FF into location CE, 
and press STAET on CPU to 
continue processing. 



Ref . No. 



57 
53 



57 
53 



57 
53 



57 
53 



57 
53 



57 

53 



57 
53 



57 
53 
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Code 

ESTR 

OEOF 



0E10 



0E11 



0E12 



0E13 



0E14 



0E15 



0E1A 



0E1B 



0E9A 



0E9B 



Cause 



No TPLAE information has been found for 
a file in the label-information area. 



Too many TPLAB statements have been 
read for the current program; or CONFG 
statement is incorrect for the 
current program. 



Output tape is not at load point, and 
file serial number of preceding trailer 
label does not correspond to informatio] 
in TPLAE statement. 



Output tape has not expired. 



+ 



Volume serial number in standard volume 
label ,does not correspond to file 
serial number in TPLAB statement. 



+. 



For an input file, no trailer label has 
been read after the tape mark although 
standard labels have been specified. 



Reguired tape drive has not been 
assigned. 



Read/compute write/compute overlap 
feature has been specified with the 
EXEC RWC statement, but no DTFBG 
RWC=YES was issued during generation. 



DTFBG=YES has been specified 
during generation but no EXEC RWC 
statement was issued. 



Read/compute write/ compute overlap 
feature was specified by RWC in EXEC 
statement, but RPG control card has a 
blank in col. 38. 



Read/compute write/compute overlap 
feature was not specified in the EXEC 
statement, but RPG control card has a 
W in col. 38. 



Restart 



Press START on CPU to 
discontinue the job. 



Op 
a) 



erator choice: 
Press START on CPU to 
discontinue the job. 
Enter FF into location CE 
and press START on CPU to 
continue processing. 



Op 
a) 



c) 



erator choice: 
Press START on CPU to 
discontinue the job. 
Enter OF into location CE 
and press START on CPU to 
continue processing with 
mounted reel. 

Mount correct reel, enter FF 
into location CE, and press 
START on CPU to continue 
processing. 



c) 



erator choice: 
Press START on CPU to 
discontinue the job. 
Enter OF into location CE 
and press START on CPU to 
continue processing with 
end-of-file condition. 
Enter IF into location CE 
and press START on CPU to 
continue processing with 
end-of- volume condition. 



Press START on CPU to 
discontinue the job. 



Press START on CPU to 
discontinue the job. 



Ref .No. 



57 
53 



57 
53 



57 
53 



57 
53 



53 



53 
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Code 
ESTE 



OEAO 



+- 



0EB1 



0EB2 



0EC1 



0EC2 



OED 



1A01 



1AG2 



1A03 



1A04 



1A05 



1A06 



1A1F 



Cause 



Permanent tape read error. 



When fixed- le 
the length of 
integer multi 
length, or gr 
block length. 



! 

ngth records are specified, 

a block read is not an 
pie of the specified record 
eater than the specified 



When variable 
specified, th 
is not equal 
indicated in 
greater than 
specified. 



-length records are 
e length of a block read 
to the block length 
the block header, or 
the maximum block length 



When variable-length records are 
specified, the record length is 0, 



When variable-length records are 
specified, the record length is 
greater than the maximum record 
length specified. 



Next reel of file cannot be opened 
since the OPEN routine has been 
overlaid. 



ENE card of input deck is not followed 
by an end-of-file card. 



END card of input deck is missing. 



Both NOLIST and NODECK have been 
specified in AOPTN statement (s) . 



System tape is incomplete or damaged. 



Last card of input deck may have been 
punched by mistake on 2520 Card Read- 
Punch or 2560. 



Card following END card of input deck 
has been misread and cannot be 
identified . 



Macro definition not found in library 



Restart 



Operator choice: 

a) Press START on CPU to 
discontinue the jot. 

b) Enter EF into location CE 
and press START on CPU to 
continue processing. 



+— 



Press START on CPU to 
discontinue the job. 



Press START on CPU to 
discontinue the job. 



Press START on CPU to continue 
processing. Check whether the 
card read after END card 
belongs to next job, and if 
so, return it to the hopper. 



Follow procedure 53. (Check 
whether cards for the next job 
have been ejected by the NPHO, 
and if so, return them to their 
hopper decks.) 



Press START on CPU to 
discontinue the job. 
+ 



Press START on CPU to 
discontinue the job. (If the 
error occurs repeatedly, a new 
system tape must be created.) 



Press START 
processing, 
stacked. If 
punched, rep 
correct card 



on CPU to continue 
Check last card 
it has been 
lace it by a 



__l 

Press START 
processing, 
card read af 
belongs to n 
return it to 

Press START 
discontinue 
error occurs 
system tape 



on CPU to continue 
Check whether the 
ter END card 
ext job, and if so, 
the hopper. 



on CPU to 

the job. (If the 

repeatedly, a new 
must be created.) 



Ref .No. 



57 
53 



57 
53 



53 



53 



53 



53 



— I 



53 
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Code 
ESTB 



1ABA 



1ABB 



f— 



1AC0 
1AC1 
1AC2 
1ACA 
1ACB 



1ACE 



1AD0 
1AD1 
1AD2 
1ADA 



1 AEO 
1AE1 
1AE2 
IAEA 



1AF0 
1AF1 

1AF2 
1AFF 



1B00 



-+ 



1B01 



1B02 



Cause 



Card punching device assigned to SYSOPT 
is not attached to the Model 20. 



SYSIPT was in "not operational" 
condition when it was attempted to 
eject the last card into the stacker. 



SYS000 
SYS001 
SYS002 
SYSOPT 
SYSIPT 



SYSLST 



Incorrect assignment. 
No physical device assigne 
to required symbolic devic 
address, or tape drive 
assigned to SYSIPT, or "da 
converter off" specified f 
7-track drive. 
Conflicting assignment. 
SYSLST is unassigned while 
AOPTN NOLIST is not 
specified. 



d 
e 

ta 
or 



SYS000 Tape drive has been assign 

SYS001 to more than one symbolic 

SYS002 device address used (other 

SYSOPT than SYS002 and SYSOPT) . 



\ 

ed 



SYS000 
SYS001 
SYS002 
SYSOPT 



End of reel has been reach 
during write operation. 



1 

ed 



SYSOOO 
SYS001 
SYS002 

SYSRES 



Erro 
oper 
reco 
expe 
etc. 



r condition during rea 
ation (incorrect-lengt 
rd, tape mark where no 
cted, wrong block numb 
) due to damaged tape. 



1 

d 
h 
t 
er, 



rive assigned to more 
ic device address used, 
signed to required 
address, or "data 
specified for 7-track 



The same tape d 
than one symbol 
or no device as 
symbolic device 
converter off" 
tape drive. 

Tape Basic Monitor is incorrect. 



Control statement read on SYSRDR is not 
ASSGN, CONFG, or END statement. 



Restart 



Press START on CPU to continue 
processing. (The object program 
is net punched out.) 



+- 



Press START on CPU to continue 
processing. Empty the hopper (s) 
of the device assigned to 
SYSIPT and press NPRC. Return 
any cards following the last 
card to the hopper (s) . Return 
the hopper decks. 



Press START on CPU to 
discontinue the job. 



Correct the card containing 
the statement and continue 

processing. 



Ref .No. 



.I 

53 



52 



1B03 



Control statement on SYSIPT 
misplaced or incorrect. 



Press STAET on CPU to 
discontinue the job. 



53 



I— 



1B04 



1st operand or separator (,) of ASSGN 
statement is incorrect. 



I— 



1B05 



2nd operand or separator (,) of ASSGN 
statement is incorrect. 



Correct the card containing 
the statement and continue 

processing. 



52 
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h- 



Code 
ESTR 



1B06 



1B07 



1E08 



1B09 



1B0A 



1B0B 



1B0C 



1B0D 



1B0E 



1B0F 



1B10 



1B11 



1B12 



1B13 



1B21 



1B22 



1B23 



Cause 



3rd operand or separator (,) or 
delimiter (blank) of ASSGN statement 
is incorrect. 



4th operand or delimiter (blank) of 
ASSGN statement is incorrect. 



—\ 



ASSGN statements for tape Basic Monitor 
specify more than 6 physical tape-drive 
addresses. 



Press START on CPU to continue 
processing. (The excess ASSGN 
statements are ignored.) 



CONFG statement for tape Basic Monitor 
is incorrect. 



PHASE statement for Job Control program 
is missing or misplaced. 



PHASE statement is incorrect or phases 
are out of sequence. 



Load address for text in TXT or REP 
card is lower than load address of 
phase or higher than 32,767. 



1 



Phase/subphase consists of less than 
24 bytes or SYSEOJ is the only input 
phase . 



-+ 



1 

Load address of phase or subphase is 
lower than end address of Basic Monitor. 



Phase has more than 9 subphases. 



Two consecutive XFR or END cards have 
been read. 



Tape mark has been encountered on 
SYSIPT. 



Specification in REP card is not 
hexadecimal . 



Error statistics specified and not 
possible with LDSYS. 



The name used in an Assembler ENTRY 
statement is the same as that used in 
a preceding Assembler ENTRY statement. 

\ 



A phase name is the same as the name of 
a control section or the name used in an 
Assembler ENTRY or EXTRN statement. 



The name used in an Assembler ENTRY 
statement is the same as that of a 
preceding control section. 



Restart 



Correct the card containing 
the statement and continued 
processing. 



t 1 

Ref .No. 



52 



Correct the card containing the 
statement and continue 
processing. 



+ 

52 



Press START on CPU to 
discontinue the job. 



Warning only. Press START on 
CPU to continue processing. 
(The second XFR or ENE card 
is ignored.) 



-+ 



Operator choice: 

a) Press START on CPU to 
continue processing with 
same reel. 

b) Mount new reel and press 
START on CPU to continue 
processing. 



Press START on CPU to 
discontinue the job. 



53 



H 



53 
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Code 
ESTR 

1E24 



1B25 



1B26 



1B27 



1B28 



1B29 



1B2A 



1B2B 



1B2C 



1B2D 



1B2E 



1E2F 



1B30 



1B31 



1B32 



Cause 



The name of a control section is the 
same as that of a preceding control 
section. 



An ESID number is multiply defined 
within one control section. 



Too many phas.e, control section, ENTRY, 
and/or EXTRN names have been used for 
the specified storage capacity. 



An ESID number that is not defined in 
the control section has been referenced 
in an RLD, TXT, REP, END, or XFR record. 



An ESID number in an RLD, TXT, REP, END, 
or XFR record has been defined in the 
control section, but does not refer to 
the Section Definition entry for this 
section. 



j 



A TXT record pertaining to a previously 
processed phase has been encountered. 



, 

The name used in a Section Definition 
entry is the same as the name used in an 
Assembler ENTRY statement in a preceding 
control section. 



ACTION control statement contains 
invalid operand. 



The (optional) name in an ENTRY control 
statement has not been defined as the 
name of a phase or control section or 
as the name used in an Assembler ENTRY 
statement. 

, 



1st operand of PHASE statement is 
incorrect. 



2nd operand of PHASE statement is 
incorrect. 



3rd operand of PHASE statement is 
incorrect. 



1 



4th operand of PHASE statement is 
incorrect or not previously defined. 



! 



No device assigned to required symbolic 
address (es) , or the same tape drive 
assigned to more than one symbolic 
address used, or incorrect device 
type (s) assigned. 



Symbolic transfer address in an END or 
XFR record has not been defined 
previously. 



Restart 



Press START on CPU to 
discontinue the job. 



Press START on CPU to continue 
processing (Statement is 
ignored.) 



Press START on CPU to 
discontinue the job. 



Press START on CPU to 
discontinue the job. 



Ref .No. 



53 






53 



53 
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V— 



Code 
ESTR 



1B33 



1B34. 



1B35 



1B36 



1B37 



1B38 



1B39 



1B40 



1B41 



Cause 



Tape mark has been read on SYSIPT. 



Input records are out of sequence. 



First card column contains character 
other than blank or 12-2-9, or — if 
blank — card is not a PHASE, ACTION, 
or ENTRY card. 



h 



REP card contains an incorrect 
specification. 



Load address calculated from PHASE 
statement is higher than 32,767. 



— I 



1st input statement is not a PHASE 
statement. 



No TXT cards present for last phase. 

, 



End of reel reached on SYS000 or 
SYSOPT. 



During read operation, tape mark 
encountered where not expected, or 
record of incorrect length read. 



Restart 



i 1 

Ref .No. 



Operator choice: 

a) Press START on CPU to 
continue processing with 
same reel. 

b) Mount new reel and press 
START on CPD to continue 
processing. 



Press START on CPU to 
discontinue the job. 



Press START on CPU to continue 
processing. (The card is 
ignored.) 



Press START on CPU to 
discontinue the job. 



Press START on CPU to 
discontinue the job. 



53 



53 



58 
53 



1B42 



Tape on SYS000 is mispositioned . 
(Hardware malfunction.) 



Press START on CPU to 
discontinue the job. 



1B43 



The same tape drive assigned to more 
than one symbolic device address used, 
or no device assigned to required 
symbolic device address, or "data 
converter off" specified for 7-track 
tape drive. 



1B44 



Name field of control statement contains 
incorrect specification, or, if SYSIPT 
and SYSRDR refer to the same device, 
PHASE statement is not preceded by a 
control statement. 



Follow procedure 52 and correct 
or insert the control statement 
before returning the hopper 
deck to the hopper. 



IB45 



Contr 
opera 



ol statement contains invalid 
tion code. 



1B46 



1B47 



1st operand or separator (,) or 
delimiter (blank) of control 
statement is incorrect. 

2nd operand or separator (,) of control 
statement is incorrect. 



1B48 | 3rd operand or separator (,) or deli- 
miter (blank) is incorrect. 
_ + 1 

IB49 | 4th operand or delimiter (blank) is 
incorrect. 



53 



52 



-H 
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Code 

ESTE 



1B4A 



+-- 



1B4B 



1B4C 



I— 



1B4D 



1B4E 



1B4F 



j. 

1B50 



1B51 



1B52 



1B53 



Cause 



Two consecutive XFR or END cards have 
been read # or a CATAL statement is 
encountered after an end-of-file card 
has been read on SYSIPT. 



PHASE statement is not followed by 
REP, TXT, XFR, or END cards. 



CATAL statement is encountered when 
tape mark has been read on SYSIPT. 



Phase SYSEOJ is to be included 
(replaced) and is not the first 
phase in the input stream, or SYSEOJ 
has been read as operand in a DELET 
statement . 



1 



Input phase or DELET statement out of 
sequence . 



PHASE statement contains invalid 
operands, or load address of a phase 
is lower than end address of Basic 
Monitor area, or column 1 of PHASE 
statement is not blank. 



+— 



PHASE statement contains phase name with 
illegal characters, or phase name 
consists of more than 6 characters. 



Load address in TXT or REP card is 
lower than load address of phase. 



Load address of last tyte in TXT or REP 
card is higher than 32,767. 



1 



Phase or subphase consists of less than 
24 bytes. 



Restart 



Press START on CPU to continue 
processing. (The second XFR or 
END card or the CATAL 
statement, respectively, is 
ignored. ) 



Press START on CPU to 
discontinue the job. 



Operator choice: 

a) Press START on CPU to 
discontinue the job. 

b) Enter OF into location CE 
and press START on CPU to 
continue processing. (The 
CATAL statement is ignored.) 

c) If the tape on SYSIPT con- 
tains additional input, 
leave it on the drive. 

If further input is stored 
on another tape, mount that 
tape on SYSIPT. Enter FF 
into location CE and press 
START on CPU to continue 
processing. 



Press START on CPU to 
discontinue the job. 



Press the START on CEU to 
discontinue the job. 



Ref.No. 



, 

53 



53 



H 



53 



53 



-H 



1B54 



Phase to be deleted not found in 
library . 



*■-- 



Press START on CPU to continue 
processing. (DELET statement is 
ignored.) 



1B55 



PHASE statement not found where 
expected. 



Press START on CPU to continue 
processing. (Warning only.) 



-+ 
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Code 
ESTR 



1356 



1B57 



1B58 



1B59 



1B5A 



1B60 



1B61 



1B62 



1B63 



1B64 



1B65 



1B66 



1B67 



1B68 



1B69 



Cause 



Phase has more than 9 subphases. 



MONTH statement encountered is not the 
first control statement, or two MONTE 
statements have been encountered. 



Tape Basic Monitor is incorrect. 



ASSGN statements for tape Basic Monitor 
specify more than 6 physical tape-drive 
addresses. 



REP card contains invalid hexadecimal 
character (s) . 



+— 



1st control statement is not a PBIOS 
statement. 



Statement read is not a control 
statement. 



-H 



Control statement contains invalid 
operation code. 



— 1 



PSIOB control statement contains invalid 
operand . 



PBIOR statement is out of sequence. 



DELET control statement contains 
invalid operation code. 



DELET statement with operand ALL is 
not preceded by a PRIOR statement. 



DELET control statement or input macro 
definition out of sequence. 



Element in control statement (operation 
code or operand) is missing or extends 
beyond column 71. 



During write operation on SYS000 or 
SYSOPT, end of reel is encountered. 



Restart 



Press START on CPU to 
discontinue the job. 



Ref .No. 



53 



Press START on CPU to continue 
processing. (The excess ASSGN 
statements are ignored.) 



-+- 



Press START on CPU to 
discontinue the job. 



53 



52 



Operator choice: 

a) Press STABT on CPU to 
discontinue the job. 

b) Enter FF into location CE 
and press START on CPU to 
continue processing. (The 
incorrect card is ignored. 
A correct one may be 
inserted as described in 
procedure 52.) 



53 
(52) 



Operator choice: 

a) Press START on CPU to 
discontinue the job. 

b) Enter FF into location CE 
and press START on CPU to 
continue processing. (The 
DELET statement is ignored 
or the macro definition is 
skipped.) 



53 



-H 



Operator choice: 

a) Press START on CPU to 
discontinue the job. 

b) Enter FF into location CE 
and press START on CPU to 
continue processing. (The 
incorrect statement is 
ignored. A correct one may 
be inserted as described in 
procedure 52.) 



53 



(52) 



Operator choice: 

a) Press START on CPU to 
discontinue the job. 

b) Enter FF into location CE 
and press START to continue 
processing. (Only a few 
records can be written on 
the tape.) 



58 
53 
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Code 

ESTE 

1B6B 



1B6C 



J- 

1B6D 



1B6E 



+ 



1B6F 



1B70 



1B71 



Cause 



Tape mark has been read on SYSIPT at 
the beginning of a CATAL procedure. 



Invalid MACRO statement has been 
read on SYSIPT. 



Record of incorrect length has been 
read on tape, or tape read error 
occurred . 



Macro definition to be deleted has not 
been found in library. 



Tape mark encountered within macro 
definition on SYSIPT. 



No MEND statement found when skipping 
a macro definition because of a 
previous error. 



Invalid prototype statement has been 
read on SYSIPT. 



Restart 



Operator choice: 

a) Press STABT on CPU to 
discontinue the job. 

b) Enter OF into location CE 
and press START on CPU to 
continue processing. (The 
next control statement is 
read. It should be DELET or 
END. No more macro defini- 
tions should be read on 
SYSIPT.) 

c) Enter FF into location CE 
and press START on CPU to 
continue processing. (The 
tape mark is ignored. It is 
also possible to mount a 
new input tape before 
pressing START.) 



If SYSIPT is a tape drive, 
enter FF into location CE and 
press START on CPU to continue 
processing. (The macro defini- 
tion is skipped.) 
If SYSIPT is a card reading 
device, operator choice: 

a) Correct MACRO statement as 
described in procedure 52. 
(The macro definition 

is processed.) 

b) Enter FF into location CE 
and press START on CPU to 
continue processing. (The 
macro definition 

is skipped.) 



Press START on CPU to 
discontinue the jot. 



Operator choice: 

a) Press START on CPU to 
discontinue the job. 

b) Enter FF into location CE 
and press START on CPU to 
continue processing. (The 
DELET request is ignored.) 



Press STABT on CPU to 
discontinue the job. 






Operator choice: 

a) Press START on CPU to 
discontinue the job. 

b) Enter FF into location CE 
and press START on CPU to 
continue processing. (The 
macro definition is 
skipped.) 



Ref.No. 






53 



52 



58 
53 



_l 



53 



53 



53 
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Code 
ESTH 

1B72 



1B79 



1B7A 



1B7E 



1B7C 



1B7D 



1B7E 



1B7F 



1B80 



1B81 



1B82 



1B83 



1B84 



1B85 



Cause 



Control statement has been encountered 
while reading a macro definition en 

SYSIPT. 



No device assigned to SYSRDR. 



1 



Improper SYSOPT assignment: 

a) no device assigned, 

b) device assigned is not a tape drive, 

c) tape characteristics specification 
for 7-track drive is not "data 
converter on". 

! 



Improper SYS000 assignment: 

a) no device assigned, 

b) device assigned is net a tape drive, 

c) tape characteristics specification 
for 7-track drive is not "data 
converter on". 



Improper SYSIPT assignment: 

a) no device assigned, 

b) 7-track drive assigned, and tape 
characteristics specification is not 
"data converter on". 



SYSOPT has been assigned the same drive 
as SYSRES. 



SYS000 has been assigned the same drive 
as SYSRES or SYSOPT. 



SYSIPT has been assigned the same drive 
as SYSRES, or SYSOPT, or SYS000. 



The printer has not been assigned to 
SYSLST. 



Name field of control statement 
contains improper specification. 



Control statement contains invalid 
operation code, or does not contain 
any operation code. 



DSPLY control statement contains invalid 
operand (s) . 



Column 72 of control statement is not 
blank . 



Directory entry for Job Control has not 
been found at beginning of library. 



Restart 



Operator choice: 

a) Press START on CPU to 
discontinue the job. 

b) Enter FF into location CE 
and press START on CPU to 
continue processing. (The 
control statement is ignored 
and the macro definition is 
processed.) 



Press START on CPU to 
discontinue the job. 



Correct the statement 
and continue processing. 



Press START on CPU to 
discontinue the job. (System 
tape is damaged or incorrect.) 



Ref.No, 



53 



53 



52 



53 
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Code 

ESTE 

1BA0 



1BA1 



1BA2 



1BA3 



1BA4 



1BD0 



1BD1 



*~ 



1BD2 



1BD3 



1BD4 



Cause 



End of reel reached on SYSOPT. 



During read operation on SYSIPT, tape 
mark encountered where not expected. 



Press STAET on CPU to 
— \ discontinue the job. 



Record of incorrect length read on 
SYSIPT. 



1 



No tape drive assigned to SYSIPT 
and/or SYSOPT, or the same drive 
assigned to SYSIPT and SYSOPT, or 
"data converter off" specified for 
a 7-track drive. 



Error statistics specified and not 
possible with CPSYS 



Control statement is incorrect, or 
sequence of control statements is 
invalid . 



SYSOPT or SYSLST not assigned 
when required. 



Card punching device assigned to 
SYSOPT is not attached when 
required . 



Device assigned to SYSEDR is not 
attached to the system. 



Printer assigned to SYSLST is not 
attached when required. 



Restart 



Press STAET on CPU to 
discontinue the job. 



If a control statement is 
incorrect, correct it following 
procedure 52. 

If the sequence is invalid, all 
statements that are out of 
sequence must be returned to 
the hopper and re-read. 



Press STAET on the CPU to 
continue processing. (The 
corresponding PUNCH, DSPLY or 
DSPCH statement is ignored. To 
avoid further halts, remove all 
following PUNCH, DSPLY or 
DSPCH cards, respectively.) 

Carry out a new IPL procedure. 



Press STAET on the CPU to 
continue processing. (The 
corresponding DSPLY or DSPCH 
statement is ignored. To avoid 
further halts, remove all 
following DSPLY and/or DSECH 
statements.) 



Eef .No. 
-I 



53 



-H 



53 



52 



-H 



-j 



1BE0 



Bead error on SYSEES. (Incorrect 
length record, tape mark where 
not expected, wrong block number, 
damaged tape, etc.) 



Press STAET on the CPU to 
discontinue the job. 



J— 

| 1BE1 |Bead error on SYS000 
i i 
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Code 
ESTH 



Cause 



Restart 



+ \ 



Ref .No. 



1BE2 



Tape read error on SYSRES. 



Operator choice: 

a) Press START on the CPU 
to discontinue the job. 

b) Enter FF into location CE 
and press START on the CPU 
to continue processing. (The 
misread block is put out as 
read. The next block or part 
of it may also be incor- 
rect.) 

c) Enter a value other than 00 
or FF into location CE and 
press START on the CPU to 
continue processing. (The 
current PUNCH, ESFLY, or 
DSPCH operation is 
terminated, and the next 
control statement is read.) 



1BE3 



Reflective marker encountered on 
SYS000 during execution of a 
write command . 



Press START on the CPU to 
discontinue the jot. 



1BE4 



SYS000 improperly assigned. 



1BE5 



1C00 



f 

1C01 



1C02 



SYSRDR improperly assigned. 

END control statement missing, or more 
than 15 Sort/Merge control statements 
issued. 



Sort/Merge specification errors have 
been detected. 
H 



Maximum file size has been exceeded 
during Internal Sorting (end-of-reel 
condition detected on work tape) . 



1C03 



j. 



Maximum file size has been exceeded 
during External Sorting (end-of-reel 
condition detected on work tape) . 



1C0U 



During external sorting: tape read error 
or record with incorrect length on tape 



Press START on CPU to 
discontinue the job. 



Tape mark detected on work tape during 
read-backward (may be due to incorrect 
tape-drive assignment for Restart run) . 



Press START on CPU to 
discontinue the job. 



58 
53 

53 



1C06 



Data found to be out of sequence. (In a 
Sort run., this halt may be due to a 
hardware malfunction. ) 
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Code 

ESTR 



1C0A 



1C0B 



1C0C 



I— 



1C0D 



+— 



1C30 



1C31 



1C32 



1C33 



Cause 



Pause for verifying assumptions 



Unreadable data or block of incorrect 
length found on tape. 



Checkpoint record has not been found 



Input tape contains a record which is 
longer than the specified L1 or 
shorter than the specified L4 when 
variable-length records have been 
specified. 



Incorrect information entered into 
location CE. 



Further input is expected. 



Tape mark has been read instead of 
standard volume label on input tape 
when standard labels are 
specified. 



First record of input tape is not a 
standard volume label when standard 
labels are specified. 



Restart 



If the assumptions are 
correct, press START on CPU 
to continue processing. 
If the assumptions are not 
correct, enter FF into loca- 
tion CE and press START on CPU 
to discontinue the job. 



Operator choice: 

a) Press START on CPU to 
continue processing. (The 
block is bypassed.) 

b) Enter FF into location CE 
and press START on CPU to 
discontinue the job. 



Press START on CPU to 
discontinue the job. 



53 



Display register 9 (address of 

record) . Display record-length 

field. 

Operator choice: 

a) Press START on CPU to 
continue processing. 
(Record is bypassed.) 

b) Enter FF into location CE 
and press START on CPU to 
discontinue the job. 



Enter co 
location 
CPU to r 

Operator 
a) Mount 
START 
proce 
Enter 
and p 
conti 
end-o 



rrect informa 

CE and press 

esume operati 



tion into 
START on 
on. 



b) 



choice: 

new reel and press 

on CPU to continue 
ssing. 

FF into location CE 
ress START on CPU to 
nue processing with 
f-file condition. 



Operator choice: 

a) Mount correct tape 
START on CPU to co 
processing. 

b) Enter FF into loca 
and press START on 
discontinue the jo 



and press 
ntinue 

tion CE 
CPU to 

b. 



Operator choice: 

a) Mount correct reel and press 
START on CPU to continue 
processing. 

b) Enter OF into location CE 
and press START on CPU to 
continue processing. (The 
tape is accepted.) 

c) Enter FF into location CE 
and press START on CPU to 
discontinue the job. 



Ref.No. 



53 



58 



53 



53 



58 



+ 1 

58 



53 



58 



53 
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Code 
ESTR 



Cause 



Restart 



t 1 

Ref .No. 



1C3U 



Volume serial number in standard 
volume label on input tape does not 
correspond to file serial number in 
TPLAE control statement. 



Operator cho 

a) Press STA 
continue 
(User lab 

b) Mount cor 
into loca 
START on 
processin 
Enter IF 
and press 
discontin 



c) 



ice: 

RT on CEU to 

processing. 

els are proc 

rect reel, e 

tion CE , and 

CPU to conti 

g. 

into locatio 
START on CP 
ue the job. 



essed.) 
nter OF 

press 
nue 

n CE 
U to 



— + 



58 



53 



1C35 



1C3 6 



1C3 7 



1C3 8 



1C3 9 



1C3A 



1C3C 



1C3D 



1C3E 



Tape mark has been encountered instead 
of standard header label on input tape 

1 



Standard header label has not been 
found on input tape when standard 
labels are specified. 



Operator cho 
a) Mount cor 
START on 
processin 
Enter OF 
and press 
continue 
tape is a 
Enter FF 
and press 
to discon 



is) 



c) 



xce: 

rect reel an 

CPU to conti 

9- 

into locatio 

START on CP 
processing, 
ccepted.) 
into locatio 

START on CP 
tinue the jo 



d press 
nue 

n CE 
U to 
(The 

n CE 

U 
b. 



File identification and/or file serial 
number in standard header label do not 
correspond to information in TPLAB 
control statement. 



1 



Volume sequence number in standard 
header label does not correspond to 
information in TPLAB control statement 



1 



Information other than the file 
identification, file serial number, and 
volume sequence number in the standard 
header label does not correspond to 
information in TPLAB control statement. 



Operator choice: 

a) Fress START on CPU to 
continue processing. (The 
tape is accepted.) 

b) Hount correct reel, enter OF 
into location CE, and press 
START on CPU to continue 
processing. 

c) Enter FF into location CE 
and press START to 
discontinue the job. 



Invalid standard user header label has 
been read on input tape. (First three 
characters are not UHL.) 



Tape mark has been encountered instead 
of standard trailer label on input tape 



Standard trailer label has not been 
found on input tape when standard label* 
were specified. 



b) 



c) 



Block count in standard trailer label 
does not equal number of blocks read 
from input tape. 



-+ 



1C3F 



Invalid standard user trailer label has 
been read on input tape. (First three 
characters are not UTL.) 



Op 
a) 

h) 



erator choice: 
Press START on CPU to 
continue processing with 
EOF condition. 
Mount new reel, enter OF 
into location CE, and press 
START on CPU to continue 
processing. 

Enter IF into location CE 
and press START on CPU to 
discontinue the job. 



erator choice: 
Press START on CPU to 
continue processing. 
Enter FF into location CE 
and press START on CPU to 
discontinue the job. 



58 



53 



58 



53 



58 



53 



58 



53 
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Code 
ESTB 

1CU1 



Cause 






1C42 



Last work tape has been assigned the 
same drive as an input tape. 
(Warning only.) 



Tape mark has been read instead of 
standard volume label on work tape 
when standard labels are specified. 



Restart 



Kount an appropriate tape on 
drive and press START on CPU 
to continue processing. 
+ 



Eef.No. 






Operator choice: 

a) Mount correct reel and 
press START on CPU to 
continue processing. 

b) Enter FT into location CE 
and press START on CPU to 
discontinue the job. 



58 



53 



53 



1CU3 



1C45 



1C46 



1C4A 



1C4B 



1C50 



1C51 



First record of work tape is not a 
standard volume label when standard 
labels are specified. 



, 



Tape mark has been encountered instead 
of standard header label on work tape. 



Standard header label has not been 
found on work tape when standard 
labels are specified. 



Operator cho 

a) Mount cor 
press STA 
continue 

b) Enter OF 
and press 
continue 
tape is a 

c) Enter FF 
and press 
discontin 



ice : 

rect reel and 

RT on CPU to 

processing. 

into location CE 

START on CPU to 
processing. (The 
ccepted.) 
into location CE 

START on CPU to 
ue the job. 



Invalid standard user header label has 
been read on work tape. (First three 
characters are not UHL. ) 



Work tape has not expired. 



j 



Operator 
a) Press 
conti 
tape 
Mount 
OF in 
press 
conti 
Enter 
and p 
disco 



b) 



c) 



choice; 

START on CPU to 
nue processing. (The 
is accepted.) 

correct reel, enter 
to location CE, and 

STABT on CPU to 
nue processing. 

FF into location CE 
ress START on CPU to 
ntinue the job. 



+- 



An output-tape file and a work-tape fi 
have the same tape-drive specification 



le 



Operator 
a) Press 
conti 
work 
outpu 
Mount 
START 
proce 



b) 



choice: 

START on CPU to 
nue processing. (The 
tape is accepted as 
t tape. 

correct reel and press 

on CPU to continue 
ssing. 



Additional output tape is required. 



Mount co 
START on 
processi 



rrect tape and press 

CPU to continue 
ng. 



1C52 



Tape mark has been read instead of 
standard volume label on output tape 
when standard labels are specified. 



Operator choice: 

a) Mount correct reel and 
press START on CPU to 
continue processing. 

b) Enter FF into location CE 
and press START on CPU to 
discontinue the job. 



58 



53 



58 



53 



58 



53 
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Code 
ESTH 



C53 



1C54 



+ 

Volume serial number in standard 
volume label on output tape does not 
correspond to file serial number in 
TPLAB control statement. 



1C56 



1C57 



Cause 



First record of output tape is not a 
standard volume label when standard 
labels are specified. 



Output tape is not at lead point when 
standard labels are specified, and no 
preceding trailer label has been 
found. 



Output tape is not at load point, and 
file serial number of preceding trailer 
label does not correspond to informatioj 
in TPLAB control statement. 



Output tape has not expired. 



Restart 



i 1 

Ref .No. 



Operator choice: 

a) Mount correct reel and press 
START on CPU to continue 
processing. 

b) Enter OF into location CE 
and press START on CPU to 
continue processing. (The 
tape is accepted.) 

c) Enter FF into location CE 
and press START on CPU to 
discontinue the job. 



Operator choice: 

a) Press START on CPU to 
continue processing. (The 
tape is accepted.) 

b) Mount correct reel, enter 
OF into location CE , and 
press START on CPU to 
continue processing. 

c) Enter FF into location CE 
and press START on CPU to 
discontinue the job. 

|Operator choice: 

a) Mount correct reel and 
press START on CPU to 
continue processing. 

b) Enter FF into location CE 
and press START on CPU to 
discontinue the job. 



Operator choice: 

a) Press START on CPU to 
continue processing. (The 
tape is accepted.) 

b) Mount correct reel, enter 
OF into location CE, and 
press START on CPU to 
continue processing. 

c) Enter FF into location CE 
and press START on CPU to 
discontinue the job. 



58 



53 



58 



53 



58 



53 



58 



53 



1C5C 



J— 



MODS statement specified, but no user 
routine present. 



60 



1D01 



End of RPG compilation. 



Prepare the I/O devices 
required by the object program 
and press START on CPU to 
initiate execution. 
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Code 

ESTR 



1D02 



1D03 



1D1 1 



I— 



1D12 



1B21 



Cause 



Irrecoverable error. Caused by main- 
storage overflow during generation, or 
object program too large for available 
main-storage capacity as specified 
in cols. 12 - 11 of RPG control card, 
or RPG control card missing or in- 
correct, or errors in source deck. 



-H 



Conflicting tape-drive assignments. 
(SYSRES, SYS000, and SYS001 must be 
different tape drives; SYSOPT, if 
tape drive, must not be the same drive 
as SYSRES or SYS001), or required 
tape drive not assigned, or SYSIPT 
is not a card reading device, or a 
7-track tape drive is assigned to 
SYS000 or SYS001 and the conversion 
feature is not on. 

, 



Permanent read error on SYS000. 



Permanent read error on SYS001 . 



Unit exception on SYS000. (During read 
operation, tape mark encountered where 
not expected. During write operation, 
end of reel sensed.) 



— 1 



1D22 I Unit exception on SYS001. (During read 
operation, tape mark encountered where 
not expected. During write operation, 
end of reel sensed.) 



1- 



Restart 



Press STfiHT on CPU to 
discontinue the job. 



\ 

53 



Press START on CPU to 
discontinue the job. 






Bef.No. 



53 
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APPENDIX A. JOB CONTROL STATEMENTS 



The job control statements are submitted to 
the Job Control program to request func- 
tions of this program. 

The formats and functions of the job 
control statements used with the Model 20 
Tape Programming System are described 

below. 

The following notation is used in the 
format description: 

1. Upper case words or letters must appear 
in the control statement exactly as 
given in the description of the format. 

2. Lower case words or letters represent 
information to be supplied by the pro- 
grammer or operator. Their meaning is 
described in the text immediately fol- 
lowing the format description. 

GENERAL FORMAT OF JOB CONTROL STATEMENTS 

Any job control statement contains 

• a na me , 

• an operation code, 

• one or more operands (if required) , 

• comments [optional) . 

Name 

All job control statements are identified 
by two slashes (//) in columns 1 and 2 
(name field) , followed by at least one 
blank column. 

Operation Code 

The type of control statement is defined by 
the operation code. The codes and their 
meaning are summarized in Figure 50. The 
operation code determines which function of 
the Job Control program is requested. The 
last, character of the code must be followed 
by at least one blank. 

Operands 

Most of the job control statements require 
some additional information (operands) . If 
a control statement contains more than one 
operand, each operand is separated from the 
following one by a comma. The last char- 
acter of an operand (or group of operands) 
must be followed by at least one blank. 

Comments 

Comments may be used in any of the job con- 
trol statements. At least one blank column 
must separate the operand (s) or, if the 



statement does not contain any operands, 
the operation code, from the comments. 



ASSGN 



f 

CONFG 



Operation 
Code 



inserts, changes, or 
deletes I/O device assign- 
ment in logical unit table 



DATE 



EXEC 



FILES 



JOE 



j. 

LOG 






NOLOG 



OPTN 



PAUSE 
TPLAB 

UPSI 



VOL 



Function 



places storage-capacity 
specification into communi- 
cation region 

1 



places date into communica- 
tion region 



indicates end of a set of 
job control statements and 
returns control to loading 
routine 



positions tape reel by 
skipping specified number 
of tape marks or by 
rewinding 



is required in every set of 
job control statements and 
specifies name of program 



causes listing of job con- 
trol statements and error 
statistics on SYSLOG 



causes the listing of job 
control statements and 
error statistics to be 
discontinued 



-H 



causes 
statist 



initiation of error 
ics 



s tape label infor- 
for individual file 



i 

causes system halt 

supplie 
mation 

changes 
byte in 
region 



setting of UPSI 
communication 



specifies name of tape file] 
to be processed; specifies 
the symbolic adress of the 
tape drive on which this 
file is mounted 



Figure 50 



Summary of Job Control 
Statements 
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Note: The information (including possible 
comments) contained in a job control 
statement must not extend beyond column 
71. 



X^cuui 

This operand specifies the actual I/O 
device address in hexadecimal nota- 
tion: c is the attachment-point spe- 
cification, uu is the unit-number spe- 
cification. The following specifica- 
tions are used. 



ORDER OF INPUT 

Job control statements are read on a 
device whose symbolic address is SYSRDR. 
Normally, the first statement of a set of 
job control statements for a particular 
job is a JOB statement. Only the PAUSE, 
LOG, and NOLCG statements may precede a 
JOB statement. The last statement of a 
set of job control statements must be an 
EXEC statement. 



Except where noted, the remaining con- 
trol statements of a set may be arranged 
in any order between the JOB and EXEC 
statements. 



FUNCTIONS AND FORMAT OF JOB CONTROL 
STATEMENTS 

The function and format of each type of 
job control statement is described in 
detail in the following sections. 



ASSGN Control Statement 

The ASSGN control statement is used to 
assign an actual I/O device address to a 
specific symbolic I/O device address. It 
is also used to "unassign" a symbolic I/O 
device address, i.e., remove an entry from 
the logical unit table. 

The ASSGN control statement has one of 
the following formats: 



| Name | Op. Code | Operands 



I// 



-\ 

| ASSGN 



|// | ASSGN 



-4 

| SYSxxx,X«cuu« ,dd 

-+- 



1- 



ISYSxxx^'cuu' ,dd,X'ss' 



— 1 



(// JASSGN 



|SYSxxx,UA 

j 



SYSxxx 

This operand specifies the symbolic 
I/O device address to which an actual 
device address is to be assigned, or 
which is to be unassigned. 
The symbolic device addresses used are 
listed in Figure 51 , in the order in 
which they appear in the logical unit 
table . 



uu 



1 — 2501 Card Reader 

2 — 2560 MFCM, or 

2520 Card Read-Punch, or 
2520 Card Punch 

3 — 1442 Card Punch 

4 — 1403 Printer or 

2203 Printer 
7 — 2415 Magnetic Tape Drive 
00 — all I/O devices other than 

magnetic tape drives 
01 

to -- magnetic tape drives 
FF Note : Only the numbers of 

the drives attached should 

be used. 



1 

| Symbolic 


Add 


T I 

ress, | Device Type | 


ISYSRES 




| tape drive I 
I ■ l 


| SYSRDR 




r i 

|card reading device | 
i i 


ISYSIPT 




| card reading device or | 
|tape drive | 


ISYSOPT 




|card punching device or | 

|tape drive | 
i i 


| SYSLST 
i .,.,. 




i 1 

(printer | 
i i 


ISYSLCG 




1 ! 

Iprinter | 


1 SYSOOO 

| to 

| SYS015 




|tape drives | 



Figure 51 



Summary of Symbolic I/O Device 
Addresses 



dd 



This operand is the device-type speci- 
fication. The specifications used are 
listed in Figure 52. 



This operand is the characteristics 
specification for magnetic tape drives. 
It is required for (1) 7-track magnetic 
tape drives and (2) 9-track magnetic 
tape drives with compatibility feature. 
The operand must be omitted when 9- 
track magnetic tape drives without com- 
patibility feature are to be assigned. 
The characteristics specifications for 
7-track tape drives are summarized in 
Figure 53. 
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dd 



| Device Specified 



P2 

Y 

P3 

E:4 



L1 



L3 



E5 
E6 
E7 



T1 



T2 



1403 Printer 



2203 Printer 



1442 Card Punch 



2520 Card Punch 



2501 Card Eeader 



2520 Card Bead Punch 



2560 MFCM, Primary Feed 



2560 MFCM, Secondary Feed 



2415, 7-Track Tape Drive 



2415,, 9-Track Tape Drive 



1 



Figure 52. Summary of Device-Type Specifi- 
cations (dd) 



The characteristics specifications for 
9-track tape drives with compatibility 
feature are: 



X f C0' - 
X » C 8 ' - 



1600 bytes/inch 
- 800 bytes/inch 



!2tej. In the cours 
number of ASSGN sta 
issued to assign th 
drive to various sy 
addresses. In this 
characteristics spe 
tained in the last 
for the (physical) 
all symbolic device 
the drive is assign 



e of a system run, a 
tements may be 
e same physical tape 
mbolic device 

case, the tape 
cifications con- 
ASSGN statement read 
drive are valid for 

addresses to which 
ed at that time. 



UA 



This operand is used to unassign a sym- 
bolic device address. 



Note: An ASSGN statement for SYSRES may be 
submitted only to the tape IPL program. An 
ASSGN statement for SYSRDE must be sub- 
mitted to the card IPL program, and may be 
submitted to the tape IPL and tape Job Con- 
trol programs. It must not be submitted to 
the card Job Control program. 



CONFG C ontrol Stat ement 

The CONFG control statement is used to 
place the storage-capacity specification 
into the communication region of the Basic 
Monitor program in main storage. The CONFG 
control statement has the following format: 



i 








i 


| SS 




Specifies 




I 


|Bytes/I 


nch | Parity | Translate 


1 

Convert | 






I 

i 


Feature 
i 


Feature | 






l 


i 


j 10 


200 


lodd 


off 


on | 


I 20 




| even 


off 


off | 


l 28 




| even 


on 


off | 


| 30 




|odd 


off 


off | 


| 38 




|odd 
i 


on 


off | 


| 50 


556 


i 
|odd 


off 


on | 


J 60 




| even 


off 


off | 


J 68 




I even 


on 


off | 


| 70 




|odd 


off 


off | 


| 78 




jodd 
i 


on 


off | 
i 


| 90 


800 


i 
|odd 


off 


\ 

on | 


| A0 




J even 


off 


off | 


|A8 




| even 


on 


off | 


jBO 




|odd 


off 


off | 


]B8] 




|odd 


on 


off | 



Figure 53. Summary of 7-Track Tape- 
Characteristics Specifications 
for use in ASSGN Statements 



JName |0p.Code |0perands 

I// | CONFG | xx 

i 



xx 



This operand represents the main- 
storage capacity. It may be: 



4 








or 








04 - 




4096 


bytes 


8 








or 








08 - 




8192 


bytes 


12 - 


12 


,288 


bytes 


16 - 


- 16 


,384 


bytes 


24 - 


■ 24 


,576 


bytes 


32 - 


32 


,768 


bytes 



For example, to define a Model 20 with a 
main-storage capacity of 8192 bytes, the 
CONFG statement is: 

// CONFG 8 

Note: The communication region of the 
Basic Monitor program contains a standard 
storage-capacity specification for 8192 
bytes. Therefore, the CONFG control state- 
ment is required only if the storage capa- 
city of the user's Model 20 is other than 
8K. 

EME_Control_Statement 

The DATE control statement is used to place 
the date into the communication region of 
the Basic monitor program in main storage. 
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The DATE control statement has the fol- 
lowing format: 



, __, , 

| Name | Op. Code | Operands 



j// | DATE 
i i 



yyddd 



yyddd 

This operand is t 
where yy represen 
digits of the yea 
the three-digit n 
the year (ddd may 
001 through 366) . 
For example, the 
1966, would be sp 
Job Control progr 
specification and 
field of the comm 
the form 09016624 



he date specification, 
ts the rightmost two 
r, and ddd represents 
umber of the day in 
be any of the numbers 

date September 1, 
ecified as 66244. The 
am converts this date 

places it in the date 
unication region in 
4. 



Note: The DATE control statement need be 
submitted only once after the Basic Monitor 
program has been loaded. Prior to the 
execution of a program, the Job Control 
program checks whether the communication 
region contains the date. 

E XEC Control Statement 

The EXEC control statement indicates to the 
Job Control program that the reading of a 
set of job control statements has been com- 
pleted and that control is to be returned 
to the loading routine (in the Basic Mon- 
itor program if no operand is specified, in 
the tape Job Control program if the operand 
LOADER is specified) . 

The EXEC control statement has one of 
the following formats: 



i 1 1 

| Name | Op. Code | Operands 
j. ,_ + 

I// I EXEC | 



I 

I// 
i 



EXEC 



|[RWC], [LOADER] 



T 
not 
to d 
stat 
Job 
caus 
cont 
load 
not 
(hex 



he f i 
conta 
elimi 
ement 
Contr 
es th 
rol t 
addr 
be be 
adeci 



rst type of 
in an operan 
t any set of 
s issued to 
ol program, 
e Job Contro 
o the Basic 
ess of the n 
low main-sto 
mal) . 



EXEC statement does 
d. This type is used 

job control 
the card or the tape 

The statement // EXEC 
1 program to return 
Monitor program. The 
ext program phase must 
rage position 067E 



The second type of EXEC statement 
contains one or both of the symbols LOADER 
and RWC in the operand field. 

The statement // EXEC LOADER causes the 
Job Control program to transfer control to 



a loader routine, whic 
end of the Easic Monit 
storage. The function 
routine is to load a p 
magnetic tape drive (t 
card-image format) , or 
device, assigned to SY 
macro instruction cont 
program thus loaded ca 
the physically next pr 
SYSIPT. When an EOJ m 
encountered in the pro 
returned to the Basic 
symbol LOADER may only 
operand field when the 
program is used. The 
next program phase mus 
main-storage position 
the device assigned to 
drive. If this device 
the first available ma 
is 64 (hexadecimal) by 
JOB RPG, name is speci 
LOADER will be ignored 



h is located at the 
or area in main 
of this loader 
rogram from the 
he program must be in 

from the card 
SIPT. Any FETCH 
ained in the object 
uses the loading of 
ogram phase from 
aero instruction is 
gram, control is 
Monitor program. The 
appear in the 
tape Job Control 
load address of the 
t not be below 
07D0 (hexadecimal) if 
SYSIPT is a tape 
is not a tape drive, 
in-storage position 
tes higher. If // 
fied the operand 



The statement // EXEC RWC causes the Job 
Control program to change the mode of the 
Basic Monitor from non-overlap to overlap. 
This statement can be issued for both card 
and tape Job Control programs. The load 
address of the next program phase must not 
be below main-storage position 0834 
(hexadecimal) . 



When the EXEC statement con 
the symbols LOADER and RWC (in 
order) in the operand field, t 
Control program changes the mo 
Basic Monitor from non-overlap 
and transfers control to the 1 
discussed above. The load add 
next program phase should not 
main-storage position 0960 (he 
the device assigned to SYSIET 
drive. If this device is not 
the first available main-stora 
is 64 (hexadecimal) bytes high 



tains both 

either 
he Job 
de of the 

to overlap, 
oader routine 
ress of the 
be below 
xadecimal) if 
is a tape 
a tape drive, 
ge position 
er . 



Note: Each set of job control statements 
must be delimited by an EXEC control 
statement. 

FILES, Control Statement 

The FILES control statement is used to 
position a reel of magnetic tape, either by 
skipping a specified number of tape marks 
or by rewinding the tape to the load point. 

The FILES control statement has one of 
the following formats: 



IName 10p. Code JOperand 

|// | FILES lSYSxxx,n 
| 1 j. 






j// 1 FILES 



JSYSxxx,REW 
.j 
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ies the symbolic 
drive on which the 

For a list of 
see the description 

ent .) 

ies the number of 
ipped. It may be 
ers 1 through 999. 
marks to be skipped 

the present 
e and may be any one 
rough 999. It must 
he tape marks 

labels, as well as 



SYSxxx 

This operand specif 

address of the tape 

tape is mounted. { 

symbolic addresses, 

of the ASSGN statem 
n 

This operand specif 

tape marks to be sk 

any one of the numb 

The number of tape 

(n) is counted from 

pos.ition of the tap 

of the numbers 1 th 

take into account t 

associated with the 

the file tape marks. 

This operand specifies that the tape is 
to be rewound to the load point. 

Not e ; If, in a set of job control 
statements, a FILES control statement and 
an ASSGN control statement refer to the 
same symbolic I/O address, the FILES 
statement must follow the ASSGN statement. 

JOB_Control_ Statement 

The JOB control statement indicates to the 
Job Control program that a set of job 
control statements follows. It is used to 
place the name of the program to be 
executed next into the communication region 
of the Basic Monitor program in main 
storage . 

The JOB control statement has one of the 
following formats: 



| Name |Op.Code |Operands 
I , 1 



I// 



JOB 



I// 
i 



| JOB 



|program-name 
H 



| BPG, program-name 

i 



JOB control statement 
can be submitted eith 
Control program or to 
program. When submit 
Control program, the 
specifies the name of 
included in the core- 
executed next. The c 
program checks whethe 
present, but ignores 
physically next progr 



s of the first format 
er to the card Job 

the tape Job Control 
ted to the tape Job 
operand program-name 

the object program, 
image library, to be 
ard Job Control 
r the operand is 
it and loads the 
am. 



JOB control statements of the second 
format are submitted to the tape Job 
Control program. In this format, the 
operand program-name specifies the name of 
a source program written in the RPG 
language which is to be first compiled and 
then executed immediately (i.e., without an 
intermediate Job Control run) . 



In both formats of the JCE control 
statement, the program name is not 
restricted in length. However, if the 
length exceeds six characters, only the 
leftmost six characters are recognized. 

Note: Normally, the JOB statement is the 
first statement of a set of job control 
statements. Only LOG, NCLCG, and PAUSE 
statements may precede the JOB statement. 



LCG._ Control, Stat em ent 

The LOG control statement is used to 
instruct the Job Control program to list 
the job control statements on the printer 
assigned to SYSLOG. It also causes the 
listing of tape error statistics on SYSLOG 
if generated by an OPTN control statement, 
provided the Job Control program is 
reloaded after execution of the problem 
program. If a ESCA job on which error 
statistics were collected has teen run, the 
LOG control statement also causes listing 
of ESCA error statistics. The LCG control 
statement is the first statement that is 
listed. Listing is continued in the 
following Job Control runs until a NCLOG 
statement is encountered. 

The LOG control statement has the 
following format: 



| Name | Op. Code 
1 f- 



| Operands 



I// I LOG 



Note 1: A LOG control statement may 
precede the JOE statement in a set of job 
control statements. 

Note_2: A LOG control statement is ignored 
if the printer is not assigned to SYSLOG. 

Note 3: If the job for which the LOG 
statement is issued is the first job after 
IEL, or if NCLOG was specified during the 
previous job, the first LOG control 
statement in a set of control statements 
causes the printer to skip to a new page. 

NOLOG Control_Statement 

The NCLOG control statement is used to 
instruct the Jot Control program to 
discontinue the listing of jot control 
statements on SYSLOG. The NOLCG control 
statement is the last statement that is 
listed. 

Note: When tape and/or BSCA error 
statistics are collected and a NOLOG 
ccntrcl statement is in force, a programmed 
halt occurs. The operator can then decide 
whether or not error statistics are to be 
printed. 
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The NOLOG control statement has the 
following format: 



| Name | Op. Code |Operands 
I j + 

I// INOLOG | 



Note: A NOLOG control statement may 
precede the JOB statement in a set of job 
control statements. 

OPTN Control Statement 

The OPTN control statement is used to 
initiate tape error statistics. 

The OPTN control statement has the 
following format: 



| Name | Op. Code j Operands 
I 1 1 



I// 



OPTN 



| TES 



H 



TES 



Tape error statistics are to be 
initiated . 



Ncte : A PAUSE contro 
placed before the JOB 
between the JOB state 
statement in a set of 
statements. A EAUSE 
issued before the JOB 
immediate system halt 
statement issued betw 
and the EXEC statemen 
after the reading of 
statements has been c 
immediately before th 
associated program) . 
processing can be res 
Start key on the CPU 



1 statement m 

statement an 
ment and the 

job control 
control state 

statement ca 
A PAUSE co 
een the JOB s 
t causes a sy 
the set of co 
ompleted (i.e 
e loading of 

In either ca 
umed by press 
console. 



ay be 
d/or 

EXEC 

ment 
uses an 
ntrol 
tatement 
stem halt 
ntrol 

the 

se, 
ing the 



TPLAB Control Statement 

The TPLAB control statement is used to 
supply file label information for label 
processing. 

The TPIAE control statement has the 
following format: 



| Name | Op. Code | Operands 

|// |TPLAB | 'label-information' 



Note 1: Error statistics will only be 

listed on the printer when a LOG statement 
is issued and the Job Control program is 
reloaded after execution of the problem 
program . 

Note 2: Error statistics are not permitted 
with the following IBM-supplied programs: 

• The language translators (Assembler and 
HPG) during generation time. 

• The service programs (Linkage Editor, 
Load System Tape, Copy System Tape, 
Directory Service, Core-Image 
Maintenance, Macro Maintenance, 
Core-Image Service, and Macro Service). 

• The Initialize Tape utility program. 

The Job Control program will perform a 
check to prevent the initiation of error 
statistics with these programs. 

PAUSE Control Statement 

The PAUSE control statement is used to 
instruct the Job Control program to 
interrupt processing. 

The PAUSE control statement has the 
following format: 



i 1 1 

| Name | Op. Code |Operands 

|// | PAUSE | 

i 1 1 



^label-inform a tion_|^ 

This operand consists of fields 3 
through 10 of the standard IBM tape 
file label, enclosed in apostrophes. 
(The format of this label is described 
i- n l££endix_B of the SEL publication 
ISI_System/360_Model_20 x _Tap.e 
£E2S£ill!ill3_.Sy_stem^ Control and Service 
Programs, Form C2 4-90 00.) The 
file-lafcel fields must be contiguous in 
the operand of the TFLAE statement. 
They are not separated by commas. The 
operand reguires 51 columns (49 columns 
of information, enclosed in 
apostrophes) . 

Note: The TPLAB control statement must 
immediately fellow the associated VOL 
control statement. 

UPSI Control, Statement 

The UPSI control statement is used to set 
user program switch indicators in the UPSI 
byte of the communication region. 

The UPSI control statement has the 
following format: 



|Name |0p.Code |Operands 
I 1 1 



I// 
i 



lUPSI 

J 



I xxxxxxxx 

-J 



xxxxxxxx 

In this operand, x can be either 1 or 
any other EBCDIC character (c) except 
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blank. The eight characters represent 
the eight bits of the UPSI byte. A 
specification of 1 means that the 
corresponding bit is to be set on. A 
specification of c (any EBCDIC 
character except 1 or blank) indicates 
that the status of the corresponding 
bit is not to be changed. Trailing c's 
need not be specified {e.g., the 
specifications 1cc11ccc and 1cc11 are 
equivalent) . 



VOL Control Statement 



| Same | Op. Cede | Operands 



I// 
i 



| VOL 



SYSxxx, file- name 



-H 



SYSxxx 

This operand specifies the symbolic 
address of the magnetic tape drive on 
which the reel containing the file to 
be processed is mounted. (For a list 
of symbolic addresses, see the 
description of the ASSGN statement.) 



The VOL control statement is required when 
standard IBM tape labels are to be checked 
or written. 

The VOL control statement has the 
following format: 



file-name 

This operand specifies the name of the 
file to be processed. This name may be 
1 to 7 characters in length. It must 
be identical to the file name used in 
the pertinent program. 
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APPENDIX B. MICRO PROGRAM LOAD PROCEDDRES 



On a Model 20 Submodel 5, the micro program 
in main storage may be destroyed when any 
of the following conditions occurs: 



1. Process Check — the system halts and 
the Process indicator on the CPU is 
turned on. 

2. Machine Check on the 2520 or 2560 — 
the system halts and the Machine Check 
indicator on the affected unit is 
turned on. 

3. Unrecoverable I/O error — the system 
halts and a programmed-halt code is 
displayed ^n the E-S-T-R fields of the 
CPU console. All programmed-halt codes 
are listed in the section 
Pr oqramm ed-Halt Displays . 

If a halt caused by any of these three 
conditions occur on a Model 20 Submodel 5 
and operation cannot be resumed, the micro 
program must be reloaded. This is done by 
performing the following steps: 



1. Press the I/O Check-Reset key on the 
CPU and reset all check lights on the 
attached I/O devices. 

2. Set the Register Data/Address switches 
on the CPU console. 

3. Set the Mode switch on the CPU to CPL. 

4. Place the micro-program card deck 

(supplied by the IBM customer engineer) 
in the hopper of the loading unit of 
the 2501 or 2520 or in the primary feed 
of the 2560. 

5. Press the Load key on the CPU console. 

If the micro program has been 
successfully loaded, the U-L and E-S-T-R 
fields on the CPU console will contain all 
zeros. If an error occurred during the 
loading process, a code will be displayed 
in the U-L fields on the CPU console. The 
code displays that can be handled without 
the aid of an IEM customer engineer are 
listed below. 



Code Displayed 
U L 




1 

2 



+ 



3 



Cause 



Successful load. 



Read error and/or 
feed check. 



Card missing or out 
of sequence. 

Section out of 
sequence. 



Restart 



Set Mode switch on CPU to PROCESS 



Restart the micro program load procedure. 



Check the card sequence in columns 73-80. 
(If the seguence error was caused by a break 
in the numeric sequence, a card is out of 
sequence; if it was caused by a break in the 
alphabetic sequence, a section is out of 
sequence) Correct the sequence error and 
restart the load procedure. 

If a card is missing , call the IEM customer 
engineer . 



H 
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APPENDIX C. GLOSSARY 



Allocate : To assign storage locations or 
areas of storage for specific routines, 
portions of routines, constants, data, etc. 

Assemble: To prepare a machine-language 
program from a symbolic-language program by 
substituting absolute operation codes for 
symbolic operation codes and absolute or 
relocatable addresses for symbolic 
addresses. 

Assemb ler : A program that prepares an 
object language program by producing 
absolute or relocatable machine code from a 
machine-oriented source program of 
statements containing symbolic operation 
codes and symbolic operands. 

A sse mb le r _La nguage : A symbolic language 
(used to write source programs) which 
enables the programmer to use all machine 
functions as if he were coding in machine 
language. 

b: The symbol for a blank space. 

Base Address: A given address from which 
an effective address is derived by 
combination with a relative address. 



(See 



Displacement) 



Basic Monitor : The main control program. 
Available in a card, a tape, and a disk 
version. Resident in main storage when 
control required. Loads programs into main 
storage and causes their execution. 

Binary Digit: The smallest unit of 
information. It can have either of the two 
binary values zero or one. 

Bit : See Binary Digit. 

Block (records) : 

1. (v.t.) To group records for the 
purpose of conserving storage space or 
increasing the efficiency of access or 
processing. 

2. (n.) A physical record so constituted, 
or a portion of a telecommunications 
message defined to be a unit of data 
transmission.. 

BSCA: Binary Synchronous Communications 
Adapter . 

Buffer; (Program Input/Output^ : A portion 

of main storage into which data is read, or 
from which it is written. 

B y te: The basic unit of information in 
System/360. Every byte consists of eight 
bits, each having a value of zero or one. 



Card- Resident S y stem: Consists of the card 
control programs Basic Monitor, Job 
Control, and Initial Erogram Loader. Used 
for the execution of object programs 
contained in punched cards. 

Character: Cne of a set of elementary 
signals which may include decimal digits 
through 9, the letters A through Z, 
punctuation marks and any other symbols 
acceptable to a computer for reading, 
writing, or storing. 

Checkpoint: A point in a program about 
which sufficient information is stored to 
permit restarting the problem from that 
point. 

CMAINT: Core-Image Maintenance Program. 

Communication_Region : An area of the 
(Basic) Monitor. Contains data, 
storage-capacity specification, UPSI byte, 
user areas 1 and 2, program-name area, and 
various control bits used by the system. 
Provides for inter-program and 
intra-program communication. 

Compiler: A program which translates a 
program written in a problem-oriented (RPG, 
PL/I, etc.) language into object code. 

Control Field : A group of contiguous bytes 
that are within a data record. The sort or 
merge of the records is based on the 
collating sequence as applied to these 
bytes. 

Control Statement: Any of the statements 
in the input to a specific job that define 
the requirements of the job, its options, 
or control its actions. 

Con trcl_Program : A set of programs which 
provide the management functions necessary 
for continuous operation of a computing 
system. 

Copy System Tape Program: A TPS Service 
program contained in punched cards. Copies 
user's tape-resident system from one tape 
onto another. 

Core-Image D irector y: A directory to the 
program (core-image) library. Each 
directory entry contains information about 
a program phase and its location in the 
library. 

Cere- I mage Library: An external-storage 
area containing the Job Control program, 
other IEE-supplied programs (except the 
[Basic] Monitor) , and user problem 
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programs. Permits retrieval of programs 
and/or phases by the (Basic) Monitor. 



C ore -Image Maintena nce Program : A Sy s t e m 
Service program. Updates the core-image 
library and directory. Is used to add 
and/or replace and/or delete phases and the 
(Basic) Monitor. 

Core-Image Service Program: A system 
service program that permits the printing 
and/or punching of one or more entries of 
the core-image library. 

CPS YS : Copy System Tape Program. 

CSE R V : Core-Image Service Program. 

Data_File: A collection of related records 
treated as a unit and consisting of data in 
one of several prescribed arrangements and 
described by control information to which 
the system has access. 

D efauj.t_ Value : The operand specification 
assumed by a program when the value is 
omitted . 

Dir ectory Entry : A unit in the core- image 
or macro directory. (Phase header or macro 
identifier.) 

Directory Service Progr am : A System 
Service program. Causes printing of the 
core-image and/or macro directory and/or 
system directory. 

Displ acem ent : A value, or an expression 
representing a value, which is added to a 
base address to obtain the effective 
address. 

Display Service, Program : See Directory 
Service Program. 

DSERV: Directory Service Program. 

E BCDIC : (Extended Binary Coded Decimal 
Interchange Code) A specific set of 
eight-bit codes standard throughout 
System/360. 

EOF Card: End-of-file card which 
terminates a logical set of input data. 
(/*b in columns 1-3.) 

File: See Data File. 

Fixed -L ength Record: A record having the 
same length as all other records with which 
it is logically or physically associated. 

Half word: Two adjacent bytes where the 
left byte is on a half word boundary . 

Half wo rd Boun dary: Even-numbered byte 
position in main storage, coincident with 
the left byte of a halfword. 



Hexadecimal: A number system using the 
eguivalent of the decimal number 16 as a 
base. The values 0-15 are represented by 
the digits 0-9 and the alphabetic 
characters A-F. 



iiiiialize: To set counters, switches, and 
addresses to zero or other starting values 
at the beginning of, or at prescribed 
points in , a computer routine. 



Initial Prog ram Lo ader (IP LI : A System 

Control program. Loads (Basic) Monitor 
into main storage. Required for the 
initialization of the system. 



I/O (Input/Output) : 

both. 



Input or output, or 



I/0_Area: An area (portion) of main 
storage into which data is read or from 
which data is written. I/O means 
Input/Output. 

IPL: Initial Program Loader. 

Job Control Program: A System Control 
program. Called into main storage between 
jobs and provides for automatic job-to-job 
transition. Processes control statements 
in the input stream that identify a job or 
define its requirements and options. 

Job Control Statement: Any one of the 
control statements in the input stream that 
identifies a job or defines its 
requirements and options. 

K_Bytes: 1024 bytes. For example: nK = n 
x 1024 bytes. 

Label : A physical identification record on 
magnetic tape or disk. See Tape Labels. 

LDSYS: Load System Program. 

Library „ Man agemgnt_ Pro grams : Collective 
term for five system Service programs: 
Core-Image Maintenance, Macro Maintenance, 
Core-Image Service, Macro Service, and 
Directory Service. 

Lin kajje_Editor : a system Service program. 
Relocates programs or phases and links 
separately assembled programs or phases. 

L°ad_System_ Program : A Service program 
that creates a tape or disk-resident system 
from card input. 

Logical_Recor d : A record identified from 
the standpoint of its content, function, 
and use rather than its physical 
attributes. It is meaningful with respect 
to the information it contains. 
(Contrasted with Physical Record.) 
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Logical Unit Table: A feature of the 
(Basic) Monitor. It has logical unit 
blocks, each of which refers to one 
specific symbolic I/O address. These 
symbolic addresses are related to physical 
I/O device addresses by means of ASSGN 
control statements. 



Macro Directory: An area of the macro 
library section of a system. The TPS 
version has four priority sections, each of 
which contains the identifiers for the 
macro definitions contained in the 
corresponding section of the macro library. 
Is used with programs written in the 
Assembler language. Macro directory can be 
listed on a printer by means of the 
Directory Service program. 

Macro Identifier: An entry in the macro 
directory that identifies and points to the 
corresponding macro definition in the macro 
library . 

Macro Instruction: A macro instruction is 
a statement that is used in a source 
program and replaced by a specific sequence 
of machine instructions in the associated 
object program. 

Macro Library__(Tape) : An area of the macro 
library section of the system tape. Has 
four priority sections, each of which 
contains the macro definitions required by 
the macro instructions in user programs. 

Mac ro Mainten a nce Pro gram : A system 
Service program. Updates the macro library 
and directory. Is used to add and/or 
delete macro definitions. 

Macro Service, Pro gram : A system service 
program that permits the printing and/or 
punching of one or more macro definitions 
from the macro library. 

M MAI ST : Macro Maintenance Program. 

Mnemonic: A contraction or abbreviation 
whose characters are suggestive of the full 
expression. 

MSERV : Macro Service Program. 

Multi-Reel. Tape File: A file stored on 
more than one tape reel. 

Multi-Volume Tap e F ile: See Multi-Beel 
Tape File. 

Operand: The representation of a value 
that must be supplied to define a selective 
function to the program . 

Phase : A portion of a program executed as 
one main-storage load. The smallest 
addressable unit in the core-image library 
of a tape or disk-resident system. May be 



output of Assembler, RPG or Linkage Editor 
program. 



Physica l R ecord: A record identified from 
the standpoint of the manner or form in 
which it is stored and retrieved; that is, 
one that is meaningful with respect to 
access. (Contrasted with Logical Record.) 

Physic al Unit Table: A feature of the 
(Basic) Monitor. It has several physical 
unit blocks, each of which contains a 
physical device address. Pointers to these 
entries are inserted into the logical unit 
table by means of ASSGN control statements. 

Pri ority, .Ley el: Classifies macro 
definitions by frequency of usage in TPS. 
Four levels are used in the macro library 
section of the tape resident system. 

Priori ty Section: An area of the TPS macro 
directory or library. Each priority 
section is assigned to a specific priority 
level. 

Read/Compute, Write/Compute: A feature of 
the IBM System/360 Kodel 20 Submodel 5 that 
permits data transfer to or from I/O units 
to be overlapped with processing. 

Reblock: To change the format of a file so 
that a different number of logical records 
comprises one physical record. See Block. 

R ecor d: A general term for any unit of 
data that is distinct from all others when 
considered in a particular context. 

Report . Program Generator (RPG) : A program 

which constructs reports or report-writing 
programs in accordance with input 
specifications of the data file and of the 
desired report. 

RWC Feature: See Read/Compute, 
Write/Compute. 

Statement: A meaningful expression or 
generalized instruction in a source 
language. 

Sub_phase: A part of a program in the 
core-image library. Must be provided with 
a phase name that is identical in the first 
four characters with the name of the main 
phase. 

Symb oli c I/O Addres s: A symbol used in 
IBM-supplied and user-written programs to 
refer to an I/O device (e.g., SYSRES, 
SYSIPT, SYS005) . This address is related 
to an actual address by means of the 
logical unit table. 

SYSIPT: System Input Unit. 

SYSOPT: System Output Unit. 
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Sys te-ro Tape; The reel of magnetic tape on 
which the user's tape-resident system is 
located . 

Tape Erro r Statistics: An optional 
function of the (Basic) Monitor that 
collects and lists tape operating 
characteristics . 

Tape Labels: Special records at the 
beginning and end of tape files. There are 
volume, header, and trailer labels. They 
are used to identify the reel of tape and 
the file they precede.' They also contain 
certain housekeeping information. 

Ta pe M ark: A special symbol that can be 
read from, or written on, magnetic tape. 
Used to indicate the end of a file or file 
segment, and to segregate the labels from 
data . 

Ta p e-Re side nt_Sys tern: (Also referred to as 
"user's tape-resident system.") Contains 
the Basic Monitor program, the Job Control 



program, and may contain any IBM-supplied 
and/or user-written programs and/or macro 
definitions. Consists of three sections: 
Monitor section, program library section, 
and macro library section. Is created and 
updated by means of maintenance programs. 



Unblock : (v.t.) To change the format of a 
file so that a physical record comprises 
only one logical record. See Block. 

UPSI: User Program Switch Indicators. 

User P rogram Switch Indicators: A field of 
one byte within the communication region of 
the (Basic) Monitor program. Specified 
bits (switches) may be set by means of the 
UPSI control statement and tested in user's 
programs. 

Variable-Iength_Becor ds : Logical records 
in a file in which the number of bytes in 
each record is not a fixed value, but may 
vary within prescribed limits. 
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ACTION statement 30 

AOPTN statement. 26 

Assembler program 26 

control statements 26 

end-of-file card . 27 
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I/O device assignments 26 

input 27 
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output 29 

preparation of system run. ..... 27 
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error statistics 164 
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MMAINT run 49 

Card Basic Monitor program ....... 8 

Card Initial Program Loader 8 
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input. 8,12 

loading unit ....... 8 

output ............... 1 1 

preparation of system run 11 

sample program .....71 

1419/1259 IOCS 19 

CATAL statement 

Core-Image Maintenance program ... 59 

Macro Maintenance program. 56 

Checkpoint and restart procedures 

(Sort/Merge program) 37 

Clear Storage card 
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tape-resident system .13 
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CONFG control statement 16 2 

Control programs (card and tape) .... 5 
Control statements 

for Assembler program 26 

for Copy System Tape program .... 54 
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for Linkage Editor program 30 

for Load System Tape program .... 47 
for Macro Maintenance program. ... 56 
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for Sort/Merge program .34 

for Utility programs 38 

Copy System Tape program .54 
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input 54 

output 55 
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programmed halts 55 

Copying a system tape 54 

Core-Image Maintenance program ..... 59 

control statements .... 59 

I/O device assignments ....... 59 

input. 54 

output 60 
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programmed halts 60 

sample program . 71 

Core-Image Service program 63 

control statements .63 
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input . 63 
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output 64 

preparation of system run 64 

programmed halts 64 

CPSYS (see also Copy System Tape 

program) 54 
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CSERV (see also Core-Image Service 

program) ... 63 

DATE control statement 162 

DEIET statement 

Core-Image maintenance Program ... 60 
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Device-type specifications ...... 162 

Directory Service program .62 

control statements .62 

I/O device assignments 62 

input 62 

output . ......62 

preparation of system run. ..... 62 
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Displaying directories 62 
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machine reg. 42 

operating proc. 44 

output . 46 

program package 42 

DSEEV (see also Directory Service 

program) ..... ....62 
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DSPCH statement 66 

DSPLY statement 

Core-Image Service program ..... 63 

Directory Service program. ..... 62 

Macro Service program 66 



END statement 

Core-Image Maintenance program ... 60 
Core-Image Service program ..... 64 

Directory Service program. ..... 62 

Load System Tape program .... 47,48 

Macro Maintenance program. ..... 57 

Macro Service program 66 

Sort/Merge program 34 

Utility programs .......... 39 

End-of-file card 

Assembler program 27 

Core-Image Maintenance program . . . 59 
Report Program Generator ...... 24 

tape-resident system run 13 

Utility programs .40 

ENTKY statement. 30 

Error statistics 

BSCA ............... 164 
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EXEC control statement 163 

Execute-Loader function. ........ 16 
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sample 71 

tape-resident system ... 18 
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Field-Select statement ..39 
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output 31 
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